excel 宏字符串拆分

在Excel中，宏可以用来进行字符串拆分操作，通常通过使用VBA内置函数来实现。例如，如果你想将一串以逗号或分号分隔的文本拆分成单独的单元格，可以使用 `Split()` 函数。这个函数的基本语法如下：

Function SplitString(inputText As String, delimiter As String) As Variant
    Dim arr() As String '声明一个字符串数组来存储结果
    SplitString = Split(inputText, delimiter) '使用指定的分隔符分割输入文本
End Function

例如，假设你想把A1单元格中的字符串按照逗号拆分，并将结果存储在B列，可以这样写宏：

Sub SplitAndStore()
    Dim inputCell As Range, result() As String
    Set inputCell = Range("A1") '设置输入文本所在的单元格
    result = SplitInputString(inputCell.Value, ",") '调用上面定义的函数
    For i = 0 To UBound(result)
        Cells(i + 1, 2).Value = result(i) '将结果写入B列
    Next i
End Sub

在这个例子中，`UBound(result)` 返回数组的长度，因为 `Split()` 函数会返回包含所有子字符串的新数组。