Excel VBAを掌握する極限の知見：配列のメモリ構造を操り、処理速度を極限まで高める
こんにちは。業務自動化の深淵へようこそ。
マクロの記録を卒業し、一段上のエンジニアを目指すあなたへ。今日は、VBAにおける「データ構造の選択」という、プロの現場で最も差がつく領域についてお話しします。
多くの初学者が「とりあえずセルを書き換える」コードを書き、処理の遅さに頭を抱えます。そのボトルネックを解消する鍵は、メモリ上での配列の扱い方にあります。
—
1. なぜ「セル」ではなく「配列」なのか？
Excel VBAにおいて、`Cells(i, j).Value` という記述をループ内で繰り返すのは、「1回ずつ海を渡って荷物を運ぶ」ようなものです。非常に時間がかかります。
一方、配列は「荷物を全てコンテナ（メモリ）に積み込み、一気に運ぶ」手法です。
- セル操作: Excelの描画エンジンとのやり取りが発生するため、低速。
- 配列操作: メモリ内だけで完結するため、数千倍以上の速度差が出ることもあります。
—
2. 1次元か、2次元か？ データの「形」を見極める
配列を定義する際、「とりあえず2次元でいいや」と考えていませんか？ それが落とし穴です。
1次元配列（ベクトル）の適正
1列だけのデータや、フラグの管理、単純なリストを扱う場合は1次元配列を選んでください。メモリレイアウトが単純で、管理コストが極めて低いためです。
2次元配列（行列）の適正
Excelの表（行×列）をそのまま取り込む場合は、2次元配列が必須です。
ここで重要なのは、「VBAの2次元配列は、Excelのシートと同じ `(行, 列)` の順で管理する」という鉄則です。
—
3. 実践：効率的なデータ集計のコード
では、実際に「1万行の売上データから特定の条件の合計を算出する」というタスクで、配列の力を体感してみましょう。
Sub FastDataAggregation()
Dim rawData As Variant
Dim resultArr() As Double
Dim i As Long, j As Long
‘ 1. セル範囲を一気にメモリ（2次元配列）へ取り込む
‘ この一行でセルとの往復をゼロにします
rawData = Range(“A1:C10000”).Value
‘ 2. 配列の次元を理解する
‘ rawData(行, 列) の形式で格納されています
‘ 行：LBound(rawData, 1) To UBound(rawData, 1)
‘ 列：LBound(rawData, 2) To UBound(rawData, 2)
ReDim resultArr(1 To 10000) ‘ 結果格納用の1次元配列
‘ 3. 配列内のループ処理
‘ メモリ内での操作なので、爆速で終わります
For i = 1 To UBound(rawData, 1)
‘ 例えば、3列目が「売上」だとして条件分岐
If rawData(i, 3) > 1000 Then
resultArr(i) = rawData(i, 3) 0.1 ‘ 手数料計算など
End If
Next i
‘ 4. 一気にシートへ書き戻す
Range(“E1”).Resize(UBound(resultArr), 1).Value = Application.Transpose(resultArr)
End Sub
このコードのポイント
- `Variant`型の使用: `Range.Value`から一括代入する場合、配列は必ず`Variant`型で受け取る必要があります。
- `Resize`プロパティ: 配列のサイズ分だけ一気に書き出すために必須のテクニックです。
- `Application.Transpose`: 1次元配列を列方向に書き出す際の魔法の呪文です。
—
4. 陥りやすいエラーと回避策
「インデックスが有効範囲にありません」
これは最も多いエラーです。配列の要素数を超えてアクセスしようとした時に発生します。
解決策: 必ず `LBound(配列名, 次元)` と `UBound(配列名, 次元)` を使って、境界値を動的に取得する癖をつけてください。「10000」と直書きするのは禁忌です。
メモリの枯渇
数百万行のデータを全て配列に入れると、メモリを圧迫します。その場合は、データを分割して処理する「バッチ処理」の考え方が必要になりますが、まずは10万行程度であれば配列で十分高速に動作します。
—
最後に：プロへの第一歩
配列をマスターしたあなたは、もう「マクロの記録」をペタペタ貼るだけのユーザーではありません。「メモリ上のデータをどう動かせば最も効率的か」を考え始めた時点で、あなたはエンジニアの視座に立っています。
次は、この配列を `Collection` オブジェクトや `Dictionary` オブジェクトと組み合わせて、重複排除や高速検索を行うステップへ進んでみてください。
ここをクリアすれば、Excel VBAの基本はバッチリです。自信を持って、次の自動化へ踏み出してください！応援しています。
