Excel VBA 動的配列の基本：宣言方法からReDimによるサイズ変更までを解説

VBAでデータの量が不確定な場合、どうやって配列を使用したらいいんだろう…
そんな疑問を持っていませんか？

お悩みポイント

• 増減するデータを柔軟に管理したい
• 動的配列の基本的な概念を理解したい
• VBA初心者でも簡単に動的配列を使いこなしたい

この記事では、VBAにおける「動的配列」を使ってデータを効率的に管理する方法を詳しく解説します。

「動的配列」を使うことで、データの増減に柔軟に対応でき、プログラムの効率性が大幅に向上します。

この記事では、動的配列の基本的な概念からその使い方、さらに配列のサイズ変更方法まで詳しく解説します。

使用例もすべてコピペして実行できるので、ぜひ最後までご覧いただき、実践してみてください。

そもそも配列とは？という方は、そちらを解説した記事もありますので是非ご覧ください。

VBA 配列の基本：宣言方法と使用方法の概念を解説

ループ処理を使ってセルにデータを転記していたけれど、データが増えると動作が遅くなって困ったことはありませんか？ お悩みポイント 複数のデータをまとめて管理する方法を知りたい 配列の基本的な概念を理解したい VBA初心者でも簡単に配列を使いこ...

zangyo-free.com

2024.09.14

【　この記事の概要　】

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

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

VBAの動的配列とは？

動的配列とは、プログラムの実行中にサイズを変更できる配列です。

通常の配列は、宣言時にサイズを決定しますが、動的配列は後からサイズを変更することができます。
これにより、データの量が変動する状況でも、柔軟に対応することが可能です。

動的配列の宣言方法

動的配列を宣言する際には、Dimステートメントを使用しますが、サイズを指定せずに宣言します。

このように宣言された配列は、サイズが未定のままですが、次に説明する「ReDimステートメント」を使うことでサイズを決定します。

ReDimステートメントを使って動的配列を再宣言する

動的配列のサイズを設定・変更する際に使うのが、ReDimステートメントです。
ReDimを使うことで、配列のサイズを新たに設定し、必要に応じて何度でもサイズを変更することができます。

使用例

Dim myArray() As Long
ReDim myArray(3)  '// 配列のサイズを3に設定

このコードでは、動的配列「myArray」のサイズを「3」に設定しています。
これにより、myArrayは「4つ」の要素を持つ配列として利用できるようになります。
※要素は「0」から開始するため、「0」「1」「2」「3」の合計「4つ」の要素を持ちます。

注意点: ReDimによるデータの消失

ここで注意が必要なのは、ReDimステートメントを使ってサイズを再設定すると、既存の配列データがすべて消去され、初期化されてしまうことです。

例えば、myArray(0)にデータを格納していても、ReDimを再度実行すると、既存のデータが失われ、新しいサイズで配列が再作成されてしまいます。

Sub ExampleReDim()
    Dim myArray() As Long

    '// 配列を初期化してサイズを5に設定
    ReDim myArray(5)
    myArray(0) = 10
    myArray(1) = 20

    '// 現在の配列の内容を確認
    Debug.Print "変更前のReDim: " & myArray(0) & ", " & myArray(1)  '// 結果: 10, 20

    '// 配列のサイズを10に変更
    ReDim myArray(10)

    '// ReDim後にデータを確認
    Debug.Print "変更後のReDim: " & myArray(0) & ", " & myArray(1)  '// 結果: 0, 0 (データが消える)
End Sub

処理結果

詳細解説

このように、ReDimだけを使用すると、配列の再宣言時に既存のデータが失われるため、データを保持したままサイズを変更したい場合は、ReDim Preserveステートメントを使う必要があります。

ReDim Preserveを使ってデータを保持する

先ほど説明した通り、ReDimを使って配列のサイズを変更すると、元のデータは失われます。
しかし、Preserveキーワードを使うことで、既存のデータを保持しながら配列のサイズを変更することが可能です。

使用例

Sub ExampleReDimPreserve()
    Dim myArray() As Long
    
    '// 配列を初期化してサイズを5に設定
    ReDim myArray(5)
    myArray(0) = 10
    myArray(1) = 20

    '// 現在の配列の内容を確認
    Debug.Print "Before ReDim Preserve: " & myArray(0) & ", " & myArray(1)  '// 結果: 10, 20

    '// 配列のサイズを10に拡張し、データを保持
    ReDim Preserve myArray(10)

    '// ReDim Preserve後にデータを確認
    Debug.Print "After ReDim Preserve: " & myArray(0) & ", " & myArray(1)  '// 結果: 10, 20 (データが保持される)
End Sub

処理結果

詳細解説

このコードでは、myArrayのサイズを「10」に拡張しながら、最初に格納したデータ（myArray(0) = 10, myArray(1) = 20）を保持しています。

ReDim Preserveを使用することで、サイズ変更後もデータが保持され、Debug.Printで確認した際にも元のデータが表示されます。

動的配列がよく使用される場面

動的配列は、以下のような場面で特に役立ちます。

動的配列の注意ポイント

動的配列を使用する際には、いくつかの注意点があります。

動的配列の使用例をご紹介

ここからは、「動的配列」の使用例を紹介します。
どれも実際に動作するコードなので、ぜひ実行してみてください。

使用例1: データの追加に対応する動的配列

ユーザーが入力したデータを動的配列に格納する方法を紹介します。
動的配列を使うことで、データが増えていく状況に柔軟に対応しながら、データを効率的に管理することが可能です。

主な使用用途
動的配列を使用して、入力データが増減する場合に対応したデータ管理が可能です。
例えば、Excelシートにユーザーが入力したデータを順次動的配列に格納し、後で一括処理を行いたい場合に非常に有効です。

Sub AddData()
    Dim dataArray() As String
    Dim i As Long
    
    i = 0
    
    Do While Cells(i + 1, 1).Value <> ""
        ReDim Preserve dataArray(i)
        dataArray(i) = Cells(i + 1, 1).Value
        i = i + 1
    Loop
End Sub

処理結果

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

• Do While (繰り返し)

1行ずつ解説

この使用例では、動的配列を活用してユーザーが入力したデータを効率的に管理する方法を紹介しました。

ReDim Preserveを使うことで、データを保持しながら配列のサイズを動的に変更し、柔軟なデータ処理が可能になります。

使用例2: UBoundとLBoundを使用した動的配列の範囲操作

動的配列の範囲を確認するために「UBound」と「LBound」を使用する方法を紹介します。
「UBound」は配列の上限インデックスを、「LBound」は配列の下限インデックスを取得するために使用されます。

主な使用用途
動的配列の範囲を動的に確認したい場合に使用します。
具体的には、配列の最初と最後のインデックスを確認する必要があるときに便利です。
この機能を使うことで、配列の処理を行う際に、誤って範囲外のインデックスにアクセスするリスクを回避できます。

Sub CheckArrayBounds()
    Dim myArray() As Long
    ReDim myArray(5)
    
    myArray(0) = 10
    myArray(1) = 20
    myArray(2) = 30
    
    MsgBox "下限のインデックス: " & LBound(myArray) & " 上限のインデックス: " & UBound(myArray)
End Sub

処理結果

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

• MsgBox (メッセージボックス)

1行ずつ解説

この使用例では、LBoundとUBoundを使用して動的配列の範囲を確認する方法を紹介しました。

この方法を使うことで、配列のインデックス範囲を動的に取得し、安全かつ効率的に配列のデータ処理を行うことが可能になります。

特に、配列のサイズが変更される可能性がある場合や、動的に生成された配列の処理を行う際に、範囲外のエラーを防ぐために役立ちます。

まとめ

動的配列は、VBAプログラミングにおいて柔軟で効率的なデータ管理を実現する重要なツールです。
データの量が不確定な場合や、動的に増減するデータを扱う際に非常に有効です。

この記事では、動的配列の基本概念から、サイズ変更方法、データを保持するためのReDim Preserveの使い方、そして具体的な使用例について詳しく解説しました。
これらの知識を活用することで、より柔軟で効率的なプログラムを作成できるようになります。

ポイントのおさらい

さらに学ぶために

動的配列の基本を理解したら、次は配列を使った高度なデータ操作や、他の配列関連の技術に挑戦してみましょう。
データ管理のスキルが向上し、より複雑なシナリオにも対応できるようになります。

サイトマップ

VBAワークシート関数 VBA 基本設定 VBAとは？ VBAの始め方 VBAのおすすめ設定 セル操作 RangeとCells CurrentRegion Offset Resize 最終行・最終列の取得 変数 変数 オブジェクト変数 グロ...

zangyo-free.com

2024.08.28