AutoCAD VBAの静寂を打ち破れ：『Utility.Prompt』で実現する、疎通なきUIからの脱却
AutoCADの処理が長引くとき、コマンドラインが沈黙を守ることは、オペレーターにとっての「死」を意味する。なぜなら、彼らはシステムがハングアップしたのか、それとも計算に没頭しているのかを判別する術を持たないからだ。
AutoCAD VBAにおいて、`AcadDocument.Utility.Prompt` は単なる文字列出力ツールではない。それは、システムとユーザーの間に引かれた唯一の「生命線」である。
今回は、この単純なメソッドを、プロフェッショナルなアーキテクチャの文脈で再定義し、レガシー環境を洗練させるための極限の知見を授ける。
—
1. なぜ「Prompt」なのか：UIスレッドと同期の概念
AutoCADの内部処理は、しばしばUIスレッドを占有する。`MsgBox` を多用すれば、モーダルダイアログがスタックを圧迫し、UXを阻害するだけでなく、最悪の場合、AutoCAD自体のイベントハンドリングを遅延させる。
`Utility.Prompt` は、AutoCADのコマンドラインバッファに直接文字列を流し込む。これは非同期に近い挙動を示すため、処理の進捗をユーザーに伝えつつ、メインスレッドへの負荷を最小限に抑えることができる。
実践：洗練された進捗通知クラス
単なる `Prompt` の羅列は、コードを汚染する。以下のように「Logger」として抽象化し、オブジェクトのライフサイクルを管理するのが、シニアエンジニアの流儀である。
‘ @Class: CLogger
‘ 目的: コマンドラインへの進捗出力を一元管理し、処理の中断検知を可能にする
Option Explicit
Public Sub Log(ByVal message As String)
On Error Resume Next ‘ 万が一の通信エラーを握りつぶす設計
Dim doc As AcadDocument
Set doc = ThisDrawing
‘ プロンプトへの出力
doc.Utility.Prompt vbCrLf & “[SYSTEM LOG]: ” & message
‘ 強制的に再描画リクエストを送り、コマンドラインの更新を促す
DoEvents
End Sub
—
2. メモリ最適化と「Dispose」の精神
VBAはガベージコレクションを自ら制御できないが、COMオブジェクトの寿命管理を怠ることは許されない。長時間処理の中で `Utility` オブジェクトを安易に何度も呼び出すと、メモリの断片化や、COMラッパーのリークを招くリスクがある。
極限の知見：
長時間ループ内で `ThisDrawing.Utility` にアクセスし続けるのではなく、スコープの開始時に一度だけ参照をキャッシュせよ。また、大規模なループ処理では `DoEvents` を適度な間隔で挿入し、Windowsメッセージキューを処理させることが、システム全体の安定性に直結する。
—
3. レガシー環境への適合：Windows APIとの連携
もし、より高度な「現在の処理ステップ」を可視化したい場合、単なるコマンドライン出力では足りない時がある。そんな時、私は Windows API（User32.dll） を呼び出し、ステータスバーを直接操作する。
If VBA7 Then
Private Declare PtrSafe Function SendMessage Lib “user32” Alias “SendMessageA” _
(ByVal hwnd As LongPtr, ByVal wMsg As Long, ByVal wParam As LongPtr, ByVal lParam As Any) As LongPtr
Else
Private Declare Function SendMessage Lib “user32” Alias “SendMessageA” _
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Any) As Long
End If
‘ 処理開始時にステータスバーを操作し、UXを極限まで高める技術
Public Sub UpdateStatusBar(ByVal msg As String)
‘ AutoCADのステータスバー制御ロジックをここに実装
‘ ユーザーに「今、システムは生きている」ことを視覚的に伝える
End Sub
—
4. チーフアーキテクトからの提言：疎結合なUI設計
システム開発の末期において、コードベースのメンテナンス性を決めるのは「どこに何を書いたか」だ。
1. プロンプトを分散させない: ロジックの中に直書きせず、`Log` メソッドを通してラップする。
2. エラーハンドリングと連携させる: `On Error` が発生した際、即座にコマンドラインにスタックトレースを流す設計にせよ。ユーザーからの「また動かなくなった」というクレームを、解析可能なデータへと昇華させるのだ。
最後に
AutoCAD VBAは、決して「古い技術」ではない。APIを理解し、COMの挙動を掌握し、ユーザーの心理を読める者にとって、これは非常に強力な自動化言語である。
あなたが書く一言の `Prompt` が、現場のエンジニアの不安を取り除き、業務の効率を最大化する。その重みを忘れないでほしい。
技術は常にディテールに宿る。コードに魂を込めよ。それが、システムを構築する者の唯一の作法だ。
