気軽に楽しくプログラムと遊ぶ

自分が興味があってためになるかもって思う情報を提供しています。

Excel VBAのLBound、UBound関数

Dim Var(3 To 5, -2 To 1)      As Integer

'第2引数を省略すると1次元の値を表示します。
Debug.Print "1次元 添字下限:" & LBound(Var)
Debug.Print "1次元 添字上限:" & UBound(Var)
'2次元
Debug.Print "2次元 添字下限:" & LBound(Var, 2)
Debug.Print "2次元 添字上限:" & UBound(Var, 2)

'実行結果
1次元 添字下限:3
1次元 添字上限:5
2次元 添字下限:-2
2次元 添字上限:1