オブジェクトの亡霊を断つ：VBAクラスモジュールのライフサイクル制御とメモリ管理の極意
VBAを「簡易スクリプト言語」と侮っている者は、メモリの深淵を覗いたことがない。
`Set obj = Nothing` を書けば安泰だと信じているならば、それはVBAのメモリ管理を半分しか理解していない証拠だ。
大規模な業務システムにおいて、クラスモジュールは単なるデータ構造の入れ物ではない。それは、Windows APIのハンドルを握り、COMインターフェースを仲介し、時には数百万行のログを捌く「生存戦略の単位」である。
今日は、VBAにおけるオブジェクトのライフサイクルを完全に掌握し、メモリリークを許さない「防御的設計」の真髄を伝授する。
—
1. 参照カウンタの暴走を食い止める：`Terminate`イベントの真実
VBAのオブジェクトは参照カウント方式（Reference Counting）で管理されている。しかし、循環参照が発生した瞬間、そのオブジェクトはGC（ガベージコレクション）の迷宮に囚われ、永遠にメモリ上に残り続ける。
循環参照の典型的な地雷
‘ クラスA
Public Child As ClassB
‘ クラスB
Public Parent As ClassA
この構造で互いに参照を保持すれば、親を解放しても子は消えず、子は親を離さない。これを防ぐには、「所有関係」を明確にした設計が不可欠だ。
解決策：弱参照の模倣（オブジェクトの明示的解放）
VBAには標準で弱参照（WeakReference）がない。したがって、`Terminate`イベントで自ら参照を解除する儀式を強制する。
Private Sub Class_Terminate()
‘ ここで子オブジェクトの参照を断つことで、循環参照を物理的に破壊する
Set Me.Child = Nothing
‘ APIハンドルを保持している場合は、ここで必ずCloseHandleを叩く
‘ 放置すればそのメモリ領域はExcelが終了するまで開放されない
Debug.Print “Object Destroyed: Resources Released.”
End Sub
—
2. API連携におけるメモリ生存期間の厳格な管理
Windows APIを叩く際、`LongPtr`でポインタを受け取るケースがあるだろう。このポインタが指すメモリ領域の寿命は、VBAのオブジェクトの寿命とは無関係だ。
「オブジェクトが破棄されるなら、確保したメモリ領域も解放されるはずだ」という甘えを捨てよ。
メモリリークを許さない設計パターン
Private m_hMemory As LongPtr
Private Sub Class_Initialize()
‘ メモリ確保
m_hMemory = GlobalAlloc(GMEM_FIXED, 1024)
End Sub
Private Sub Class_Terminate()
‘ オブジェクトが消滅する瞬間に、確保したAPIメモリを確実に解放する
If m_hMemory <> 0 Then
GlobalFree m_hMemory
m_hMemory = 0
End If
End Sub
この「RAII（Resource Acquisition Is Initialization）」に近い設計を徹底しなければ、レガシー環境での長時間稼働は不可能である。
—
3. インスタンス生成のオーバーヘッドとキャッシュ戦略
`New` キーワードを安易にループ内で叩くのは、メモリの断片化（フラグメンテーション）を招く愚行である。特にExcelが数日間起動し続ける環境では、インスタンスの生成と破棄が激しいほど、ヒープ領域の肥大化を招く。
究極のシングルトン管理（Factoryパターン）
クラスの生成をクラス内部に隠蔽し、再利用可能なインスタンスをキャッシュする。
Private m_Instance As Object
Public Function GetInstance() As MyClass
If m_Instance Is Nothing Then
Set m_Instance = New MyClass
End If
Set GetInstance = m_Instance
End Function
‘ 明示的な破棄メソッドを公開しておく
Public Sub Dispose()
Set m_Instance = Nothing
End Sub
—
4. シニアエンジニアへの提言：なぜVBAでここまでやるのか
「VBAはそこまでやる言語じゃない」という声が聞こえてくる。しかし、私たちが相手にしているのは、Excelという「巨大なCOMラッパー」の上で動く、不安定なWindows環境だ。
1. スコープの最小化: 変数は可能な限りプロシージャレベルに留め、クラスメンバは必要最小限にする。
2. 明示的なNothing: 参照を解除するタイミングを論理的に制御し、`Terminate`イベントの発生を計算に入れる。
3. APIハンドルの監視: 外部リソースを握るクラスには、必ず`Dispose`メソッドを実装する（`Class_Terminate`だけに頼らない）。
VBAにおいて、コードは「書く」ものではなく「飼い慣らす」ものだ。
メモリの生存期間を支配した者だけが、Excelという不安定なプラットフォームで、止まらないシステムを構築できる。
次にコードを書くとき、その変数は「いつ死ぬのか」を常に意識せよ。
それが、プロフェッショナルとアマチュアを分かつ唯一の境界線である。
