CorelDRAW VBAの「闇」を切り裂く：メモリリークとゾンビプロセスを完全撲滅する極限の堅牢化テクニック
CorelDRAW VBAで数千、数万のベクターデータをバッチ処理していると、必ず遭遇する「CorelDRAWの突然の沈黙」。
「さっきまでは動いていたのに、なぜ最後でフリーズするのか？」
「タスクマネージャーを見ると、CorelDRAWが裏で生き残り続けている……」
これらは単なるエラーではありません。あなたのコードが「オブジェクトの死に様（ライフサイクル）」を制御できていない証拠です。
今日は、マクロの記録を卒業したプロの入り口に立つ皆さんに、CorelDRAWという巨大なCOMサーバーを飼い慣らすための「鉄壁の守り」を伝授します。
—
1. ゾンビプロセスが生まれる原因：オブジェクトの「繋がり」を断て
VBAで `Set doc = Application.CreateDocument()` と書いたとき、あなたのコードはCorelDRAWの内部メモリと強力な「鎖」で繋がれます。
プログラムが終了しても、この「鎖」が1本でも残っていると、Windowsは「まだこのプロセスは仕事中だ」と誤認し、メモリを解放しません。これがゾンビプロセスの正体です。
鉄則：オブジェクトの解放は「作成した順の逆」から
VBAはガベージコレクションが脆弱です。`Set obj = Nothing` を書く場所を間違えると、メモリは一気に枯渇します。
‘ 悪い例：解放の順序が適当で、リークの温床になる
Set doc = Nothing
Set app = Nothing ‘ これでは間に合わないことが多い
—
2. 堅牢なエラーハンドリング：究極のテンプレート
大規模バッチ処理では、「エラーが起きないこと」を前提にしてはいけません。「エラーが起きても、確実に掃除して帰る」のがプロの流儀です。
以下のテンプレートを、すべてのバッチ処理の「骨格」としてください。
Public Sub RobustBatchProcess()
‘ オブジェクト変数を明示的に宣言
Dim doc As Document
Dim shp As Shape
‘ エラーが発生したら CleanUp ラベルへジャンプ
On Error GoTo ErrorHandler
‘ 処理開始
Set doc = Application.CreateDocument()
‘ … ここに重いベクター処理を書く …
CleanUp:
‘ 【重要】何があってもここを通るようにする
If Not doc Is Nothing Then
doc.Close
Set doc = Nothing
End If
Exit Sub
ErrorHandler:
MsgBox “致命的なエラー発生: ” & Err.Description
Resume CleanUp
End Sub
—
3. CorelDRAW APIの「闇」：隠れた参照を叩き潰せ
特に注意すべきは、`ActiveDocument` や `ActivePage` のような「グローバル参照」です。これらは便利ですが、参照がいつ切れたか管理できないため、大規模処理では禁じ手です。
- ダメな書き方: `ActivePage.Layers.Add(“New”)`
- 良い書き方: `doc.Pages(1).Layers.Add(“New”)`
常に「親オブジェクト」を明示的に変数に格納し、その変数を通して操作する。これがCorelDRAW VBAにおけるメモリ管理の絶対正義です。
—
4. プロの現場で使う「強制解放」テクニック
もし、どうしてもメモリ解放がうまくいかない場合は、`DoEvents` を活用しましょう。VBAは処理が速すぎて、Windowsのメモリ解放プロセスが追いつかないことがあります。
‘ 処理の区切りでこれを入れるだけで、プロセスの安定感が段違いになります
DoEvents
Sleep 100 ‘ Windows APIで100ms待機させることで、OSの処理を安定させる
—
まとめ：ここをクリアすれば、もう怖くない
今日お伝えしたことは、以下の3点に集約されます。
1. On Error GoTo で「出口」を一本化する。（エラー時こそ掃除を徹底）
2. `Active~` 系を使わず、親オブジェクトから辿る。（参照の鎖を明確にする）
3. `Set obj = Nothing` を必ず実行する。（メモリへの敬意を払う）
CorelDRAW VBAは、強力な武器です。しかし、その強力さゆえに、扱い方を誤れば自らの処理を焼き尽くしてしまいます。
この「堅牢な骨格」さえ身につければ、数千枚のAI/EPS変換や複雑なパス演算も、CorelDRAWは文句一つ言わずに完遂してくれるようになります。
さあ、コードの隅々を見直して、あなたのマクロを「プロの道具」へと昇華させてください。応援しています！
