Question

VBA按指定标示符分割字符串问题

现在我有一个变量Name里面存了一个字符串，格式为例如 AA，BB，CC，DD， 这样，我想实现按照“，”为标示符分割，将字符串分割并去掉“，”，然后存到数组中，达到如
aa[1]=AA
aa[2]=BB
aa[3]=CC
aa[4]=DD这样。
现在的问题是，字符串也是用其他函数自动获取的，所以含有几个“，”不一定，这也就要求数组的长度不一定，求具体宏
确实好用，一定追加分数

Answer 1

Private Function MyFunction()
Dim s As String, Arr
s = "1,2,3,4,5,6,7,8,9,0"
Arr = Split(s, ",") '以逗号分割文本并放入数组，注意这个数组定义时候不能带括号，
For i = 0 To UBound(Arr)
MsgBox Arr(i)
Next
End Function

Answer 2

arr=split(name,",")
这样就把字符串分到数组中了呀，请参看split函数的用法就明白了。

Answer 3

Function GetArray(dt, idx) '从 dt 中取出第 idx 个数据: GetArray(A1,2)
aa = Split(dt, ",")
GetArray = aa(idx)
End Function