vba宏按文本或者数字进行分列

你可以使用 VBA 宏来实现按照文本或数字进行分列的功能。下面是一个示例代码，可以根据逗号将单元格的内容分列：

Sub SplitText()
    Dim cell As Range
    Dim arr() As String
    Dim i As Integer
    For Each cell In Selection
        arr = Split(cell.Value, ",")
        For i = 0 To UBound(arr)
            cell.Offset(0, i).Value = arr(i)
        Next i
    Next cell
End Sub

如果要按照数字进行分列，可以将逗号改为其他分隔符，例如空格、制表符等。另外，如果要按照不同的规则进行分列，可以根据具体情况修改代码。