VBAでのUboundとLboundの使い方：2次元配列の要素取得・追加・削除を徹底解説

「VBAで配列の要素数を簡単に取得したいけど、どうやるんだろう？」
このように悩んだことはありませんか？

・配列の要素数を確認したいけど、どうやって計算すればいいの？

・2次元配列の行や列のサイズを簡単に取得したい。

・配列の要素を削除・追加する方法も知りたい。

その場合は、VBAの「Ubound ・ Lbound」を
使用すると解決します！

この記事では、Excel VBAの「Ubound」「Lbound」関数を使って配列のサイズを取得する方法について詳しく説明します。

これらの関数を使えば、配列の要素数を簡単に取得できるだけでなく、2次元配列や動的配列の扱いもスムーズに行えます。
さらに、配列に要素を追加・削除する方法についても解説し、業務効率を向上させるテクニックを紹介します。

基本的な使い方から実践的な応用例まで、初心者でもすぐに活用できるコピペ可能なコードを紹介しますので、ぜひ最後までご覧ください。

【　この記事の概要　】

この記事を見てできるようになること

この記事を読むことで、以下のことができるようになります。

VBAでの「Ubound」と「Lbound」の基本：配列の要素数を取得する方法

「Ubound」と「Lbound」は、Excel VBAで配列の要素数を管理するために使用される便利な関数です。

これらの関数を使用することで、VBAコードから簡単に配列の範囲や要素数を取得できます。

例えば、2次元配列の行数や列数を動的に取得したり、動的配列のサイズを確認するのに役立ちます。
また、配列の要素数を元にループ処理やデータ操作を行う際にも、UboundやLboundは欠かせない存在です。

「Ubound」と「Lbound」の構成について解説

「Ubound」と「Lbound」は、配列の上限と下限の要素数を取得するための関数です。

Uboundについて解説

Ubound関数は、指定した配列の最も大きな要素数（インデックス値）を返します。
使用形式は以下の通りです。

より詳しい情報は、Microsoft公式のUBound 関数を参照してください。

Lboundについて解説

Lbound関数は、指定した配列の最も小さな要素数（インデックス値）を返します。
使用形式は以下の通りです。

より詳しい情報は、Microsoft公式のLBound 関数を参照してください。

『Ubound』『Lbound』の応用：2次元配列の操作と要素の追加・削除方法

「Ubound」と「Lbound」は1次元配列だけでなく、2次元配列や多次元配列でも効果的に活用できます。
特に、次元数を指定することで、より柔軟に配列の範囲を取得したり、要素の追加・削除などの操作も簡単に行えます。

ここでは、次元数の指定方法とその活用例について簡単に紹介し、2次元配列や要素の操作に関する基本的な使い方を見ていきます。

「Ubound」「Lbound」で、配列の次元数省略について解説

VBAの「Ubound」と「Lbound」は、次元数を指定して使用することで、2次元以上の配列でも簡単に操作が可能です。

配列の次元数を指定しない場合

配列の次元数を省略すると、VBAは自動的に1次元目の範囲を取得します。
これは、1次元配列に対して使用する場合に便利です。

Dim arr(5) As Long
MsgBox "1次元配列の上限を取得 : " & UBound(arr) '// 1次元配列の上限を取得

配列の次元数を指定する場合

2次元配列や多次元配列を使用する場合には、次元数を指定することで、特定の次元に対応する範囲を取得できます。

Dim arr(2, 5) As Long
MsgBox "2次元配列の行側上限を取得 : " & UBound(arr, 1) & vbCrLf & _
       "2次元配列の列側上限を取得 : " & UBound(arr, 2)
       '// 2次元目（列）の上限を取得

このように、次元数の指定有無によって、取得する範囲を柔軟にコントロールできるため、配列操作の精度が向上します。

2次元配列については、下記記事で具体的な内容を解説しています。
合わせてご覧ください。

あわせて読みたい

VBAで2次元配列をマスターする：データの効率的な管理と操作方法 「VBAで複雑なデータを扱う際、2次元配列はどうやって使うんだろう…」そんな疑問を持っていませんか？ ・データをExcelシートのように整理して管理したい・2次元配列の...

配列の要素追加・削除について

VBAの「Ubound」や「Lbound」を使用することで、配列の上限や下限を確認しながら動的配列に要素を追加・削除する操作が簡単に行えます。

配列の要素を追加

動的配列に新しい要素を追加する際、「Ubound」を使って配列の上限を取得し、その位置に新たな要素を挿入できます。
「ReDim Preserve」を使用することで、既存のデータを保持しつつ配列のサイズを変更できます。

ReDim Preserve arr(Ubound(arr) + 1)
arr(Ubound(arr)) = 新しい要素  '// 要素の追加

配列の要素を削除

配列から要素を削除する際は、「Ubound」を使って配列の上限を確認し、その後に配列を再定義してサイズを縮小します。
「ReDim Preserve」を使用することで、不要な要素を削除できます。

ReDim Preserve arr(Ubound(arr) - 1)  '// 要素の削除

「Lbound」は、配列の下限を確認する際に役立ちますが、要素追加や削除の操作では主に「Ubound」が使用されます。

これらの操作を通じて、VBAでの配列管理を柔軟に行うことができます。詳細は次の使用例で解説していきます。

動的配列については、下記記事で具体的な内容を解説しています。
合わせてご覧ください。

あわせて読みたい

Excel VBA 動的配列の活用法｜ReDimやPreserveの応用例付き 「Excelでデータが増えたり減ったりするけど、そのたびにプログラムを変更するのは大変…。　どうすれば効率よく管理できるんだろう？」 そんな疑問を持っていませんか？...

「Ubound」と「Lbound」を使うことのメリット

VBAの「Ubound」と「Lbound」を使用することで、配列の範囲を柔軟に取得でき、処理の効率が向上します。

特に、2次元配列や動的配列を扱う際に非常に役立ちます。

「Ubound」と「Lbound」を使う際の注意ポイント

配列の範囲を間違えると、ランタイムエラーが発生する可能性があります。
以下の点に注意しましょう。

Option Baseの確認

「Option Base 0」または「Option Base 1」の違いによって「Lbound」が返す値が変わるため、コードを書く前に設定を確認することが重要です。

動的配列の初期化

ReDimを使用して動的配列のサイズを変更した後に、「Ubound」や「Lbound」を使用する際は、再定義後の範囲を確認してください。

「Ubound」と「Lbound」の使用例をご紹介

ここからは、「Ubound」と「Lbound」の使用例を紹介します。

以下に紹介する使用例は、すべてコピペしてすぐに実行できるコードです。
気になる例は、ぜひご覧いただき、実際に実行してみてください。]

VBAの基礎から応用までを効率よくしっかり学習したい方には、UdemyのVBA講座もおすすめです。

特に自己学習で進める場合、ビデオや実践例があると理解が進みやすくなります。

＼ 　自分のペースで学べるVBA講座はこちら　 ／

【 Udemy 】初心者でも安心！VBA講座を見る

​

使用例1: 1次元配列の要素数の上限と下限を取得する

「Ubound」と「Lbound」を使って、1次元配列の要素数を取得する方法を紹介します。

コード例

Sub GetArraySize()
    Dim arr(2) As Long
    
    Debug.Print "配列の要素数の上限は " & UBound(arr) & " です"
    Debug.Print "配列の要素数の下限は " & LBound(arr) & " です"
End Sub

処理結果

コードの動作概要

このコードで使用している機能

• Dim(2) (静的配列)

1行ずつコードを解説

このコードは、配列操作においてインデックスエラーを防ぐために非常に有効です。

また、動的に配列サイズが変わる場合や、多次元配列を扱う際の基礎として、上限・下限を正確に把握できることが重要になります。

使用例2: 2次元配列の要素数の上限と下限を取得する

「Ubound」と「Lbound」を使って、2次元配列の各次元の上限・下限を取得する方法を紹介します。

コード例

Sub Get2DArrayBounds()
    Dim arr(3, 5) As Long
    
    Debug.Print "1次元目の上限は " & UBound(arr, 1) & " です"
    Debug.Print "1次元目の下限は " & LBound(arr, 1) & " です"
    
    Debug.Print "2次元目の上限は " & UBound(arr, 2) & " です"
    Debug.Print "2次元目の下限は " & LBound(arr, 2) & " です"
End Sub

処理結果

コードの動作概要

このコードで使用している機能

• Dim(3,5) (2次元配列)

1行ずつコードを解説

このコードは、VBAにおける2次元配列の上限と下限を確認する基本的な操作を示しています。
UBound と LBound を使用することで、各次元の範囲を簡単に取得でき、特に多次元配列を扱う場合に有効です。

使用例3: 動的配列に要素を「追加」する

このコードは、動的配列「arr」に新しい要素を追加する動作を行います。
ReDim Preserve を使用して既存のデータを保持しながら配列のサイズを拡張し、最後のインデックスに新しい要素を追加します。

コード例

Sub AddElementToArray()
    Dim arr() As String
    ReDim arr(2)
    
    arr(0) = "A"
    arr(1) = "B"
    arr(2) = "C"
    
    ReDim Preserve arr(Ubound(arr) + 1)
    arr(Ubound(arr)) = "D"  '// 要素の追加
End Sub

処理結果

コードの動作概要

このコードで使用している機能

• Dim() (動的配列)

1行ずつコードを解説

このコードは、動的配列に要素を追加する基本的な方法を示しています。
特に重要なのは、ReDim Preserve を使うことで既存のデータを保持しながら配列のサイズを変更できる点です。
Preserve を使わない場合、配列サイズの変更と同時に全データが消去されるため、注意が必要です。
動的配列を操作する際には、サイズ変更時のデータ保持をしっかり理解することが、ミスを防ぐために重要です。

使用例4: 動的配列に要素を「削除」する

動的配列「arr」の最後の要素を削除する方法を紹介します。

ReDim Preserve を使用することで、既存のデータを保持しながら配列のサイズを縮小し、不要な要素を削除することができます。
この操作は、動的に変更されるデータの管理に役立ちます。

コード例

Sub RemoveElementFromArray()
    Dim arr() As String
    ReDim arr(3)
    
    arr(0) = "A"
    arr(1) = "B"
    arr(2) = "C"
    arr(3) = "D"
    
    ReDim Preserve arr(Ubound(arr) - 1)  '// 要素の削除
End Sub

処理結果

コードの動作概要

このコードで使用している機能

• Dim() (動的配列)

1行ずつコードを解説

このコードは、動的配列から最後の要素を削除する方法を示しています。
ReDim Preserve を使用することで、配列のサイズを変更しつつ、既存のデータを保持できます。
特に重要なのは、Preserve を使用しないと、すべてのデータが消えてしまう点です。
動的配列を扱う場合、データを保持しつつ操作する際に、ReDim Preserve が非常に役立ちます。

使用例5: 「Ubound」と「Lbound」を使用して配列をループ処理する

配列「arr」に格納された要素数を1つずつループ処理し、それぞれの要素を出力する方法を紹介します。

Lbound と Ubound を使って、配列の範囲（最初の要素から最後の要素まで）を動的に取得し、ループ内で効率的に処理します。
これにより、配列の要素数に依存しない汎用的なループ処理が可能です。

コード例

Sub LoopThroughArray()
    Dim arr(0 To 3) As String
    
    arr(0) = "A"
    arr(1) = "B"
    arr(2) = "C"
    arr(3) = "D"
    
    Dim i As Long
    For i = Lbound(arr) To Ubound(arr)
        Debug.Print arr(i)  '// イミディエイトウィンドウに出力
    Next i
End Sub

処理結果

コードの動作概要

このコードで使用している機能

• Dim() (動的配列)

1行ずつコードを解説

このコードは、Lbound と Ubound を使うことで、配列の範囲を動的に取得し、その範囲内でループ処理を行う基本的な例です。
Lbound は配列の最初の要素のインデックス、Ubound は最後の要素のインデックスを返すため、配列の大きさに関係なく正確なループを実行できます。

配列のインデックスやループ処理が自動的に処理されるため、要素の数が増減しても正確に処理が行えるのが利点です。

この記事のまとめ

今回の記事では、Excel VBAにおける「Ubound」と「Lbound」関数を使って、配列の上限・下限を取得し、配列のサイズや要素を柔軟に操作する方法を解説しました。

ここでもう一度ポイントを振り返りましょう。

ポイントのおさらい

VBAの「Ubound」と「Lbound」を活用することで、配列操作がより柔軟で効率的になります。
これにより、配列のサイズや要素を動的に管理できるため、データの変動が激しい状況でも柔軟に対応できます。
2次元配列や動的配列を使った業務の効率化にぜひ役立ててください。

再度記事を確認しながら、コードを実際に動かし、スキルを確実に自分のものにしましょう。

この記事の内容を参考にし、次のステップとして配列操作をもっと深く掘り下げ、業務の効率化を進めていきましょう。

あわせて読みたい

サイトマップ このページは、本サイトの記事を分かりやすくまとめました。ぜひご覧ください。 目次 「VBA」を見る 「Officeスクリプト」を見る 「ワークシート関数」を見る 「JavaScr...