「Excel VBA」配列の要素を取得するサンプル
書式
Call 関数名
使用例
'配列の定数
Dim CodeArr As Variant
Sub testFunc()
'関数を呼ぶ
Call OpCodeFunc
Debug.Print CodeArr(0)
Debug.Print CodeArr(1)
Debug.Print CodeArr(2)
Debug.Print CodeArr(3)
End Sub
'配列の要素をセット
Sub OpCodeFunc()
CodeArr = Array("1001", "2002", "3003", "4004")
End Sub
実行結果
1001
2002
3003
4004