構文
記述方法は以下の通りとなります。
（1）配列が一次元の場合
UBound（［一次元配列］）
[説明]：
指定した一次元配列の行上限値（インデックス番号）を返します。
| ［一次元配列］ | 任意の一次元配列を記述します。 |
[記述例]：
UBound(配列)
（2）配列が二次元の場合
UBound（［二次元配列］，［次元数］）
[説明]：
指定した二次元配列の行又は列の上限値（インデックス番号）を返します。
| ［二次元配列］ | 任意の二次元配列を記述します。 |
| ［次元数］ | 「1」又は「2」を記述します。 ※「1」の場合は行、「2」の場合は列の上限値を返します。 |
[記述例]：
UBound(二次元配列,1)
UBound(二次元配列,2)
使い方
使い方について具体的に説明します。
一次元配列での行上限値を調べる方法
一次元配列での行上限値を調べる方法について説明します。
[プログラミング例]：
Option Base 0
Sub サンプル()
Dim 配列(3) As String
MsgBox UBound(配列)
End Sub
「Option Base 0を指定します。サンプルプロシージャの中に一次元配列：配列(3)を定義し、UBound関数を使用して行上限値をMsgBoxで表示して下さい。」との意味になります。
※上記の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。
[実行例]：
①<実行>ボタンをクリックします。
②結果は以下の様に表示されます。MsgBoxで「3」が表示されます。
[サンプル]：
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。
一次元配列での行上限値を調べる方法についての説明は以上です。
二次元配列での行上限値を調べる方法
二次元配列での行上限値を調べる方法について説明します。
[プログラミング例]：
Option Base 0
Sub サンプル()
Dim 二次元配列(3, 5) As Variant
MsgBox UBound(二次元配列, 1)
End Sub
「Option Base 0を指定します。サンプルプロシージャの中に二次元配列：二次元配列(3, 5)を定義し、UBound関数を使用して行上限値をMsgBoxで表示して下さい。」との意味になります。
※上記の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。
[実行例]：
①<実行>ボタンをクリックします。
②結果は以下の様に表示されます。MsgBoxで「3」が表示されます。
[サンプル]：
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。
二次元配列での行上限値を調べる方法についての説明は以上です。
二次元配列での列上限値を調べる方法
二次元配列での列上限値を調べる方法について説明します。
[プログラミング例]：
Option Base 0
Sub サンプル()
Dim 二次元配列(3, 5) As Variant
MsgBox UBound(二次元配列, 2)
End Sub
「Option Base 0を指定します。サンプルプロシージャの中に二次元配列：二次元配列(3, 5)を定義し、UBound関数を使用して列上限値をMsgBoxで表示して下さい。」との意味になります。
※上記の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。
[実行例]：
①<実行>ボタンをクリックします。
②結果は以下の様に表示されます。MsgBoxで「5」が表示されます。
[サンプル]：
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。
二次元配列での列上限値を調べる方法についての説明は以上です。
プログラミング（サンプル）
プログラミング事例を紹介します。
おわりに
今回はUBound関数を使用した配列の上限値を調べる方法について説明しました。類似の内容として配列の下限値を調べる方法もあります。こちらも参考にしてみて下さい。