Forループの中で取得した値を配列に格納するはずのPGを書いてみたんだけど、
「インデックスが有効範囲にありません。: '0' 」とエラーが出ます。

-------------------------------
Dim A
' Aを配列に
A = Array()
' hogeの値をカンマ区切りで配列Bに格納
B = Split(hoge, ",")

For nCnt=0 To UBound(B) Step 1
 A(nCnt) = B(nCnt)
Next
-------------------------------
B(nCnt)の値は正常に取れてるのですが…