vba 以逗号为分隔符取单元格左边内容

要以逗号为分隔符取单元格左边的内容，可以使用 VBA 中的 Split 函数。以下是示例代码：

Sub GetLeftContent()
    Dim cellContent As String
    cellContent = Range("A1").Value '假设需要取 A1 单元格的左边内容
    Dim cellArray() As String
    cellArray = Split(cellContent, ",")
    Dim leftContent As String
    leftContent = cellArray(0)
    '将取到的左边内容输出到 B1 单元格
    Range("B1").Value = leftContent
End Sub

在这个示例代码中，首先将 A1 单元格的内容存储在变量 cellContent 中，然后使用 Split 函数以逗号为分隔符将其拆分成数组 cellArray。由于需要取左边的内容，因此直接取数组中的第一个元素即可。最后将取到的左边内容输出到 B1 单元格中。