注: 最新のヘルプ コンテンツをできるだけ早く、お客様がお使いの言語で提供したいと考えております。このページは、自動翻訳によって翻訳されているため、文章校正のエラーや不正確な情報が含まれている可能性があります。私たちの目的は、このコンテンツがお客様の役に立つようにすることです。お客様にとって役立つ情報であったかどうかを、このページの下部でお知らせください。簡単に参照できるように、こちらに英語の記事があります。
配列の指定された次元で使用できる添字の最大値を、Long データ型の値で返します。
構文
UBound ( arrayname [, dimension ] )
UBound 関数には、次の引数があります。
引数 |
説明 |
arrayname |
必須。配列変数 の名前です。変数の標準的な名前付け規則に従って指定します。 |
dimension |
省略可能。バリアント型 (Long) の値を指定します。どの次元の最大値を返すかを示す整数を指定します。最初の次元なら 1、2 番目の次元なら 2、というように指定します。引数 dimension を省略すると、1 が指定されたものと見なされます。 |
解説
UBound 関数は、LBound 関数と組み合わせて、配列のサイズを求めるために使用します。配列の次元の最小値を調べるには、LBound 関数を使用します。
次のような次元の配列の場合、UBound 関数からは下表のような値が返ります。
Dim A(1 To 100, 0 To 3, -3 To 4)
ステートメント |
戻り値 |
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
例
注: 次の例は、Visual Basic for Applications (VBA) モジュールでのこの関数の使用方法を示しています。 VBA の使用方法の詳細については、[検索] の横にあるドロップダウン リストで [開発者用リファレンス] を選び、検索ボックスに検索する用語を入力します。
この例では、UBound 関数を使用して、配列の指定された次元で使用できる添字の最大値を調べます。
Dim Upper
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Returns 10.
Upper = UBound(MyArray, 3) ' Returns 20.
Upper = UBound(AnyArray) ' Returns 10.