CorelDRAW VBAを極限まで駆動する：GUI完全排除によるバックグラウンド・バッチ処理の深淵
CorelDRAWを単なる「グラフィックソフト」と見なしている間は、エンジニアとして二流だ。我々にとって、CorelDRAWは「強力なベクター演算エンジン」に他ならない。
数千ファイルのフォーマット変換において、GUIの描画（画面更新やイベント駆動）は、最大のボトルネックだ。CorelDRAWは、ウィンドウを表示し、レンダリングサイクルを回し続けるだけで、CPUの貴重なサイクルとメモリを浪費する。
今回は、Windows APIの深淵に触れ、CorelDRAWのGUIを殺し、エンジンだけを叩き起こして高速化する「ヘッドレス・アーキテクチャ」の極意を伝授する。
—
1. 原理：なぜGUIを消す必要があるのか
CorelDRAWの`Application`オブジェクトは、インスタンス化されるとデフォルトで`Visible = True`として振る舞う。これを`False`に設定するだけでは、メモリ上に描画領域が確保され続け、GDI/GDI+のリソースが消費される。
真のプロフェッショナルは、Windows APIの`ShowWindow`を直接叩き、ウィンドウハンドル（hWnd）を隠蔽し、描画パイプラインそのものを抑制する。これにより、UIスレッドのオーバーヘッドをゼロにし、変換処理のみにリソースを集中させる。
—
2. 実装：Windows APIを用いたヘッドレス・プロセスの制御
以下のモジュールは、VBAからCorelDRAW自身のウィンドウを制御するコアエンジンである。
‘ API宣言：ウィンドウの表示状態を制御する
If VBA7 Then
Private Declare PtrSafe Function ShowWindow Lib “user32” (ByVal hwnd As LongPtr, ByVal nCmdShow As Long) As Long
Else
Private Declare Function ShowWindow Lib “user32” (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
End If
Private Const SW_HIDE As Long = 0
Private Const SW_SHOW As Long = 5
‘ コア処理：GUIを完全排除した状態での変換
Public Sub BatchConvertHeadless(sourcePath As String, targetPath As String)
‘ 1. ウィンドウを隠蔽（バックグラウンド化）
‘ Application.WindowHandle プロパティで自身のハンドルを取得
ShowWindow Application.WindowHandle, SW_HIDE
‘ 描画の更新を停止（これが最も重要。再描画処理を殺す）
Application.Optimization = True
On Error GoTo Cleanup
Dim doc As Document
Set doc = Application.OpenDocument(sourcePath)
‘ 変換処理（エクスポート構造体などを利用）
doc.Export targetPath, cdrAI ‘ 例としてAI形式へ変換
doc.Close
Cleanup:
‘ 2. 状態の復旧（異常終了時も必ず戻すこと）
Application.Optimization = False
ShowWindow Application.WindowHandle, SW_SHOW
‘ 3. メモリ解放の徹底
Set doc = Nothing
End Sub
—
3. パフォーマンスを最大化するための鉄則
① 描画更新（Optimization）の制御
`Application.Optimization = True` を設定することで、VBA実行中の描画更新、ズーム、スクロールなどのイベントが全て無効化される。これを行わずに数千ファイルの処理を行うと、OSのメッセージキューが飽和し、システムがフリーズする。
② オブジェクトのライフサイクル管理
CorelDRAWのVBAは参照カウンタに依存している。特に`Document`や`Shape`の操作後は、明示的に`Set obj = Nothing`を呼び出し、ガベージコレクションを待たずに即座にメモリを解放せよ。数千回ループする場合、メモリリークは秒単位で積み重なる。
③ COMサーバーの「外部実行」という選択肢
もし、さらに高負荷な処理を安定して行いたいのであれば、VBA単体ではなく、C#を用いた外部コンソールアプリケーション（Out-of-Process COM）からCorelDRAWのオートメーションを操作すべきだ。これにより、CorelDRAWプロセスがクラッシュしても、制御側のシステムは生存し続け、エラーハンドリングとリトライ処理を自動化できる。
—
4. チーフアーキテクトからの警告
この手法は極めて強力だが、諸刃の剣でもある。
- エラーハンドリングの徹底: GUIを隠している状態でエラーが発生すると、ユーザーには何も見えず、バックグラウンドで「死んだプロセス」がメモリを食いつぶし続ける。必ず`Err.Number`を監視し、`Finally`句相当の処理で`ShowWindow`を呼び出し、プロセスを正常終了させる構造を構築せよ。
- ファイルロックの監視: 大量バッチ処理時、Windowsのファイルシステムが追いつかず、ファイルがロックされたままになることがある。`Sleep`関数で適宜ウェイトを入れるか、ファイル属性をチェックするロジックを挟むのがプロの矜持だ。
—
結論
CorelDRAWを「描画ツール」として扱うのは卒業しろ。それはあくまで、強力なベクターグラフィックス・トランスパイラである。
GUIを殺し、APIを叩き、メモリを管理する。この3つを徹底した瞬間、貴方の環境でCorelDRAWは、数千ファイルを数分で捌く「重戦車」へと変貌する。
次回の記事では、このプロセスをマルチスレッド化する（CorelDRAWの複数インスタンスによる並列分散処理）という、より危険で魅力的な領域に踏み込む。準備しておけ。
