2013年12月23日月曜日

Split関数から配列に代入

Split関数から要素数未設定の配列に代入できる。

◆Split関数

 引数1  区切り文字で区切られたテキスト。
 引数2  区切り文字の指定。
 戻り値  引数1の文字列が格納された配列。

◆例

Sub x()
  
    Dim stg() As String
    Dim i As Long
  
    stg = Split("子,丑,寅,卯,辰,巳,午,未,申,酉,戌,亥", ",")
  
    For i = 0 To UBound(stg)
        Debug.Print stg(i)
    Next
  
End Sub


変数stgの要素数をReDimで設定せずに代入可能。
stgの宣言文でstgの後に()がないとエラーとなる。
stgをVariant型にした場合、変数名の後に()があるとエラーとなる。

0 件のコメント: