概要：配列を超えた柔軟性を手に入れる
Excel VBAでプログラムを開発していると、必ずと言っていいほど「データの数が増減する」という問題に直面します。VBAの標準的な機能である「配列（Array）」は、メモリ効率は非常に良いものの、動的な要素の追加や削除、特にインデックス管理が面倒という弱点があります。ここで登場するのが「Collectionオブジェクト」です。
Collectionオブジェクトは、順序付けられた項目を一つの単位として管理するための汎用的なコンテナです。最大の特徴は、事前にサイズを定義（ReDim）する必要がなく、実行時に動的に要素を追加・削除できる点にあります。配列に慣れた初心者から、より高度なデータ構造を求める中級者まで、Collectionを使いこなすことはVBAスキルを一段階引き上げるための必須要件と言えます。本稿では、この強力なツールを実務で最大限に活かすための手法を徹底的に解説します。
詳細解説：Collectionオブジェクトの基本構造と性質
Collectionオブジェクトは、Microsoft Officeの標準ライブラリ（VBAライブラリ）の一部として提供されています。その特徴を理解するために、以下の3つの観点から整理しましょう。
1. 順序とインデックス
Collection内の各要素は、追加された順に1から始まるインデックスが割り振られます。配列とは異なり、要素を削除すると、それ以降のインデックスが自動的に繰り上がるため、インデックスの欠番を気にする必要がありません。
2. キーによる一意な識別
Collectionは「値」だけでなく「キー（Key）」を付与して保存することが可能です。これにより、インデックス番号ではなく、ユニークな文字列（例：社員番号、商品IDなど）をキーとしてデータを呼び出せます。これは辞書的なアクセスを可能にし、コードの可読性と保守性を飛躍的に高めます。
3. 動的なメモリ管理
配列のようにReDim Preserveを繰り返す必要はありません。Addメソッドを実行するだけで、メモリの再確保はVBAエンジンが自動的に行います。これは、ループ処理の中でデータ数が予測できない場合において、非常に強力な武器となります。
サンプルコード：実践的な実装パターン
以下に、コレクションの基本的な操作から、キーを利用した検索、そしてコレクションをループで回すためのテクニックを紹介します。
Sub CollectionExample()
' コレクションの宣言
Dim col As Collection
Set col = New Collection
' 1. 要素の追加 (Addメソッド)
' 第1引数に値、第2引数にキー(省略可)を指定
col.Add "東京支店", "ID001"
col.Add "大阪支店", "ID002"
col.Add "名古屋支店", "ID003"
' 2. 要素へのアクセス
' インデックスによるアクセス
Debug.Print "2番目の要素: " & col(2)
' キーによるアクセス (こちらの方が推奨されることが多い)
Debug.Print "ID002の支店名: " & col("ID002")
' 3. 要素の削除
col.Remove "ID002"
' 4. コレクションのループ処理 (For Each構文)
Dim item As Variant
Debug.Print "--- 現在の支店リスト ---"
For Each item In col
Debug.Print item
Next item
' 5. 要素数の確認
Debug.Print "現在の要素数: " & col.Count
End Sub
このコードを眺めればわかる通り、Add、Remove、Countといったメソッドは非常に直感的です。特にFor Each構文が使える点は、配列よりも優れている点です。
実務アドバイス：CollectionとDictionaryの使い分け
VBAで「キーを使ってデータを管理する」という話になると、必ず「Scripting.Dictionary」が比較対象として上がります。実務でどちらを選ぶべきか、ベテランの視点からアドバイスします。
1. なぜDictionaryではなくCollectionなのか？
Dictionaryは非常に多機能で、「Existsメソッド（キーが存在するか確認）」や「Keys/Itemsの抽出」など、Collectionにはない便利な機能があります。しかし、Dictionaryは参照設定（Microsoft Scripting Runtime）を行うか、あるいはCreateObjectによる遅延バインディングが必要です。一方、CollectionはVBAの標準機能であるため、追加のライブラリ依存がなく、どのような環境でも確実に動作します。小規模なデータの保持や、コードの可搬性を重視する場合は、Collectionが最適です。
2. 重複チェックの罠
Collectionは「キーの重複」を許しません。同じキーをAddしようとすると実行時エラーが発生します。これは「重複を許さない集合体」を作る場合にはメリットですが、意図しない重複でプログラムを止めたくない場合は、事前にエラーハンドリング（On Error Resume Nextを用いた判定）を組み込む必要があります。
3. パフォーマンスの注意点
要素数が数千を超えるような巨大なデータセットを扱う場合、CollectionはDictionaryに比べて検索速度がやや劣ります。もし、数万行規模のデータを瞬時に検索する必要がある場合は、Dictionaryへの移行を検討してください。しかし、数百件程度のリスト管理や、一時的なデータの保持であれば、Collectionで十分すぎるほどのパフォーマンスを発揮します。
応用：クラスモジュールとの組み合わせ
Collectionの真の力は、単純な文字列や数値を格納するだけではなく、「オブジェクト」を格納することで発揮されます。例えば、独自の「社員クラス」を作成し、そのインスタンスをCollectionに格納すれば、非常に洗練されたデータ管理が可能になります。
' クラスモジュール: Employee
Public ID As String
Public Name As String
' 標準モジュールでの利用
Sub ManageEmployees()
Dim employees As Collection
Set employees = New Collection
Dim emp As Employee
Set emp = New Employee
emp.ID = "A001": emp.Name = "田中"
employees.Add emp, emp.ID
' 後からプロパティを呼び出す
Debug.Print employees("A001").Name
End Sub
このように、Collectionにオブジェクトを詰めることで、VBAをオブジェクト指向プログラミングに近づけることができます。これは、長期間運用される大規模なマクロを作成する際に、コードの複雑性を管理するための非常に強力な手法です。
まとめ
Collectionオブジェクトは、Excel VBAにおける「データ構造の基礎」です。配列の不自由さに悩まされていた初心者の方は、今日からCollectionへの置き換えを始めてください。
1. 事前定義が不要なため、データ数が不明な処理に最適である。
2. キー管理ができるため、インデックス番号に依存しない堅牢なコードが書ける。
3. For Each構文によるループ処理が非常にスマートである。
4. 標準機能であるため、ライブラリ依存がなく移植性が高い。
これらのメリットを理解し、適切に使いこなすことで、あなたのVBAコードはより柔軟で、読みやすく、そして壊れにくいものへと進化します。プロフェッショナルなVBAエンジニアへの第一歩として、まずは小さなプログラムからCollectionを導入してみてください。その利便性を一度体験すれば、もう配列だけの世界には戻れなくなるはずです。技術の習得には反復練習が不可欠です。ぜひ、今日学んだコードをIDEに入力し、実際に動かしてその挙動を体感してください。
