サイトについて      連絡先   検索

VBA UBound 関数

はじめに

Excel VBA の UBound 関数を紹介します。

UBound 関数は、配列の最大インデックスを返します。

配列を最後までループしたいときに使用します。

構文

UBound(配列)

UBound(配列, 次元数)

名前 説明
引数「配列」最大インデックスを取得する配列を指定します。
引数「次元数」省略できます。配列の次元数を指定します。
戻り値数値型 (Long)

解説

インデックスが 2 ~ 3 までの配列では、3 を返します。

次元数を省略すると一次元配列の最大インデックスを返します。これは 1 を指定したのと同じです。

次元数に 2 を指定すると二次元配列の最大インデックスを返します。

UBound 関数を使用して配列を最後までループできます。

使用例

Dim i As Integer

Dim la(2) As Integer
i = UBound(la)
Debug.Print(i) ' 2

Dim lb(2 To 3) As Integer
i = UBound(lb)
Debug.Print(i) ' 3

Dim lc(2, 3) As Integer
i = UBound(lc, 1)
Debug.Print(i) ' 2
i = UBound(lc, 2)
Debug.Print(i) ' 3

Dim ld(3) As Integer
For i = LBound(ld) To UBound(ld)
    ld(i) = i
Next

関連ページ