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