メモリの深淵を覗く：VBAにおけるデータ型とメモリ最適化の極致
VBAを「おもちゃの言語」と呼ぶ者は、メモリの断片化が引き起こす致命的なパフォーマンス低下と、OSリソースの枯渇という地獄を見たことがないのだろう。
Excel VBAは、抽象化された高水準言語に見えて、その実、COM（Component Object Model）の薄いラッパーに過ぎない。大規模なデータセットを扱う際、変数の型選択を誤ることは、メモリという限られた戦場で自ら兵站を断つ行為に等しい。本稿では、メモリの重みを知るエンジニアへ向けて、VBAにおける「型」の真実と、その最適化戦略を提示する。
—
1. バイト単位の真実：データ型が支配するメモリレイアウト
VBAの変数は、宣言された瞬間にスタックまたはヒープ上に領域を確保する。この時、最も重要なのは「アライメント（境界調整）」と「型ごとのフットプリント」だ。
| 型 | バイト数 | 用途と注意点 |
| :— | :— | :— |
| `Byte` | 1 | 0-255。フラグやバイナリ操作の要。 |
| `Integer` | 2 | 16bit。CPUのレジスタ効率上、実は`Long`（4byte）の方が高速な場合が多い。 |
| `Long` | 4 | 32bit環境の標準。 可能な限りこれを使え。 |
| `Double` | 8 | IEEE 754形式。浮動小数点演算の精度と代償。 |
| `Variant` | 16~ | 最大の敵。 型判定とオーバーヘッドによりメモリを浪費する。 |
なぜ `Integer` より `Long` なのか
近年の32bit/64bit OSにおいて、CPUは4バイト単位でのメモリアクセスを最適化している。`Integer`を使用しても、内部的には`Long`へのパディングが行われるケースが多く、メモリ節約にはならないばかりか、型変換のオーバーヘッドを招く。「迷ったらLong」。これはアーキテクトの鉄則である。
—
2. 大量データを扱うための「メモリ・スライシング」戦略
100万行規模のデータを扱う際、`Variant`型の配列に格納してループを回せば、メモリの断片化（Heap Fragmentation）によりExcelが突然死する。
最適化されたデータ構造の実装例
構造体（`Type`）と`Long`を組み合わせ、メモリ配置を制御するアプローチを紹介する。
‘ メモリ効率を最大化する構造体定義
‘ 構造体はメモリ上で連続して配置されるため、アクセス速度が向上する
Private Type RecordData
ID As Long ‘ 4 bytes
Status As Byte ‘ 1 byte
Value As Double ‘ 8 bytes
‘ パディングが発生するが、Variantより遥かに軽量
End Type
Sub OptimizeLargeData()
Dim dataBuffer() As RecordData
Dim i As Long
‘ 事前に必要なメモリを一度に確保（再割り当てコストを最小化）
ReDim dataBuffer(1 To 1000000)
‘ バッファへのアクセスは高速。Variant配列とは比較にならない
For i = LBound(dataBuffer) To UBound(dataBuffer)
dataBuffer(i).ID = i
dataBuffer(i).Status = 1
dataBuffer(i).Value = Rnd()
Next i
‘ 処理終了後は明示的に解放（スコープアウトでも良いが、大規模な場合は必須）
Erase dataBuffer
End Sub
—
3. オブジェクトライフサイクルの管理：見えないリークを断つ
VBAにおいて、`Set obj = Nothing` を怠ることは、メモリリークの温床となる。特にWordやOutlookのCOMオートメーションをExcelから制御する場合、参照カウントの不一致がプロセスを永続化させる。
APIを用いたメモリ情報の取得
Windows API（`GlobalMemoryStatusEx`）を利用し、システム全体のメモリ負荷を監視するプロフェッショナルなアプローチを推奨する。
‘ メモリ状態を取得するためのWindows API定義
Private Type MEMORYSTATUSEX
dwLength As Long
dwMemoryLoad As Long
ullTotalPhys As Currency ‘ 64bit値を受けるためにCurrencyを利用するハック
‘ …省略
End Type
‘ 大規模処理の前後でメモリ状態をログ出力し、閾値を超えたら強制ガベージコレクションを促す
Public Sub CheckMemoryPressure()
‘ API呼び出しにより現在の空き物理メモリを監視
‘ システムのリソースが逼迫している場合、処理のチャンクサイズを動的に縮小する
End Sub
—
4. チーフアーキテクトからの提言
システム開発の現場において、VBAは「使い捨ての道具」ではない。レガシーな環境で数百万行のデータを処理し続けるには、以下の3点を徹底せよ。
1. Variantを排除せよ: 暗黙の型変換は、予期せぬメモリ確保を伴う最大の敵である。
2. 配列は静的か、一括動的確保せよ: ループ内での `ReDim Preserve` は、メモリ断片化の代名詞だ。
3. オブジェクト参照を厳格に管理せよ: `Set obj = Nothing` はおまじないではない。オブジェクトの寿命をプログラムの意志で制御すること。
メモリを制する者は、Excelを制する。それが、我々エンジニアが到達すべき「極限の知見」である。次回の現場でも、この知見を胸に、枯れた技術の深淵を切り拓いてほしい。
