ポインタの深淵を制御せよ：VBAにおける64bit/32bit共存の極意
VBAは「簡易的なスクリプト言語」と侮られがちだ。しかし、Windows APIというOSの深層に触れた瞬間、その評価は一変する。メモリレイアウトを直接叩き、OSのカーネルと対話する時、我々はExcelの制約から解き放たれる。
しかし、ここで立ちはだかるのが「ポインタのサイズ問題」だ。32bitと64bitの混在環境下で、思考停止したコードを書くことは、システムに時限爆弾を仕込むに等しい。本稿では、API連携の現場で必須となる`LongLong`と`LongPtr`の本質を紐解く。
—
1. なぜ「Long」では足りないのか：メモリモデルの現実
32bitアーキテクチャでは、アドレス空間（ポインタ）は32bit（4バイト）で表現された。しかし、64bit環境では64bit（8バイト）が必要となる。
VBAの`Long`型は、OSや環境に関わらず常に「32bit（4バイト）」固定だ。ここに64bitアドレスを無理やり流し込めば、上位32bitが切り捨てられ、メモリ破壊（Access Violation）によるExcelのクラッシュを引き起こす。これが、レガシーコードが現代の64bit Officeで軒並み全滅する真因である。
解決の鍵：条件付きコンパイル定数
我々が採用すべきは、VBAが備えるプリプロセッサ命令`#If`だ。これにより、実行環境に応じてコンパイル時にコードを切り分ける。
If VBA7 Then
‘ Office 2010以降（VBA7）
‘ LongPtrは32bit環境で4バイト、64bit環境で8バイトに自動変化する魔法の型
Declare PtrSafe Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As LongPtr)
Else
‘ Office 2007以前のレガシー環境
Declare Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As Long)
End If
—
2. LongPtrとLongLongの使い分け：アーキテクトの矜持
混同しやすいこの二つの型だが、役割は明確に分ける必要がある。
- LongPtr:
- 用途: メモリのアドレス、ウィンドウハンドル(HWND)、ポインタ型。
- 哲学: 「システムが要求するポインタサイズに自動追従する」ための型。APIの引数や戻り値にポインタが含まれる場合は、例外なくこれを使う。
- LongLong:
- 用途: 64bit整数演算（巨大なカウンタや、APIで指定される8バイトの符号付き整数）。
- 哲学: 32bit環境ではそもそも存在しない。 したがって、`#If Win64`等でラップしない限り、コードはコンパイルエラーになる。
実践的なAPI連携のテンプレート
以下に、環境依存を極限まで排除した構造を示す。
If VBA7 Then
‘ VBA7環境ではPtrSafeが必須
Private Declare PtrSafe Function GetActiveWindow Lib “user32” () As LongPtr
Else
‘ レガシー環境
Private Declare Function GetActiveWindow Lib “user32” () As Long
End If
Public Sub SecureAPICall()
‘ ポインタを格納する変数は必ずLongPtrで定義する
Dim hWnd As LongPtr
hWnd = GetActiveWindow()
‘ ここでhWndに対する処理を行う
Debug.Print “Window Handle: ” & hWnd
End Sub
—
3. オブジェクトのライフサイクルとメモリ最適化
API連携を行う際、メモリリークは「死」を意味する。特に`GlobalAlloc`等でメモリを確保する場合、必ず`GlobalFree`で解放しなければならない。
VBAにおいてオブジェクトの解放を怠ることは、単なるメモリの無駄遣いではなく、Excelのプロセスが終了するまで解放されない「ゾンビメモリ」を生成することになる。
シニアエンジニアが守るべき鉄則
1. 解放は必ず`Finally`ブロックのように記述する: エラーハンドリングの中で確実に解放処理を通すこと。
2. `Nothing`代入の徹底: オブジェクト参照型は、スコープを抜ける直前に`Set obj = Nothing`を明示せよ。GC（ガベージコレクション）に期待するのはアマチュアの所業だ。
3. API呼び出し後の戻り値チェック: ポインタが`0`（NULL）を返していないか、常に確認する癖をつけよ。
—
結びに：レガシーを支配せよ
VBAはレガシーである。しかし、そのレガシーをどう操るかは、エンジニアの腕次第だ。`LongPtr`という武器を手に入れた今、君はもはや「ただのVBA職人」ではない。Windowsの深層と対話し、安定した堅牢なシステムを構築するアーキテクトなのだ。
コードをコピペして動けば良いという段階は卒業しよう。なぜその型なのか、なぜそのメモリモデルなのか。その論理的帰結こそが、君のコードを「伝説」に変える。
さあ、次なる自動化の壁をぶち破りに行こう。
