VBA Split 分割为数组

以分割符分隔字符串,转化为相应数组。


语法

Function Split(str, [Delimiter], [Limit])

以分割符Delimiter分割字符串str,转化为相应数组。

Delimiter:分割字符,默认为空格。常用值:逗号、冒号、分号、等。

Limit:可选值。前Limit个元素会正常拆分,后续的归到最后一个元素。


示例

例1:用逗号分割。

Sub sub12()
  Dim s1 As String
  Dim arr1() As String
  s1 = "ab,cd,ef,gh"
  arr1 = Split(s1, ",") '用逗号分隔
  '遍历结果
  For Each element In arr1
    Debug.Print element
  Next

End Sub

输出结果:

ab
cd
ef
gh

例2:limit参数用法演示。

Split代码修改为如下代码

arr1 = Split(s1, ",", 3) '用逗号分隔

输出结果:

ab
cd
ef,gh