AutoCAD VBAの深淵へ：外部DB連携による「図面メタデータ自動管理」の極意
こんにちは。AutoCADの自動化という荒野を駆け抜ける皆さん、ようこそ。
マクロの記録ボタンを押して満足している段階は、もう卒業しましょう。業務自動化エンジニアとして、我々が扱うべきは「図面という単なる図形データ」ではなく、「図面という名の資産」です。
今回は、AutoCAD VBAを使い、図面を開いた瞬間、あるいは保存した瞬間に、そのメタデータをSQL Server等の外部データベースへ自動的に書き込む「図面管理の自動化アーキテクチャ」について解説します。
—
1. なぜ「イベント駆動」なのか？
多くの初心者は「ボタンを押したら保存する」というプログラムを書きます。しかし、プロは違います。ユーザーが「保存した」「開いた」という行為そのものをトリガー（イベント）として捉え、ユーザーの意識を介さずにデータを同期させます。
これが実現できれば、図面管理台帳の更新漏れというヒューマンエラーを、根絶することが可能です。
—
2. AutoCADイベントハンドラの核心
AutoCAD VBAには、図面の状態変化を検知する「クラスモジュール」という特別な仕掛けがあります。標準の標準モジュールではなく、クラスモジュールを使用するのが今回の肝です。
手順：クラスモジュールの作成
1. VBAエディタで `挿入` > `クラスモジュール` を選択。
2. 名前を `AppEvent` に変更します。
3. 以下のコードを記述してください。
‘ — クラスモジュール: AppEvent —
Public WithEvents AcadApp As AcadApplication
‘ 図面保存イベント
Private Sub AcadApp_DocumentSaveComplete(ByVal Document As Object, ByVal FileName As String)
‘ ここでデータベース接続処理を呼び出す
Call SyncMetaDataToDB(Document.FullName, Document.Version)
End Sub
‘ データベース更新のロジック（擬似コード）
Private Sub SyncMetaDataToDB(fPath As String, fVer As String)
Dim conn As Object
Set conn = CreateObject(“ADODB.Connection”)
‘ SQL Serverへの接続文字列（環境に合わせて変更してください）
conn.ConnectionString = “Provider=SQLOLEDB;Data Source=YourServer;Initial Catalog=DrawingDB;Integrated Security=SSPI;”
conn.Open
‘ メタデータをSQLで更新。UPSERT（存在すれば更新、なければ挿入）の考え方が重要です
Dim sql As String
sql = “EXEC sp_UpdateDrawingLog ‘” & Replace(fPath, “‘”, “””) & “‘, ‘” & fVer & “‘”
conn.Execute sql
conn.Close
End Sub
—
3. イベントを「仕込む」儀式
クラスモジュールを作っただけでは、AutoCADは動きません。AutoCAD起動時に、このクラスを「監視役」としてセットアップする必要があります。
標準モジュールに以下を記述してください。
‘ — 標準モジュール: Main —
Dim myEvent As AppEvent
Public Sub InitEvents()
‘ イベント監視用のクラスをインスタンス化
Set myEvent = New AppEvent
Set myEvent.AcadApp = ThisDrawing.Application
End Sub
ここが重要です！
AutoCADが起動するたびに `InitEvents` を走らせる必要があります。`acad.dvb` を自動ロードするように設定しておけば、AutoCADを立ち上げるたびに、あなたの図面はデータベースと「自動同期」する最強の管理ツールへと進化します。
—
4. 陥りやすい罠とエンジニアの知見
このアーキテクチャを組む際、必ずぶつかる壁が2つあります。
1. パスの正規化: 図面パスに日本語や特殊文字が含まれる場合、SQLの文字列結合で必ずエラーになります。`Replace(fPath, “‘”, “””)` のように、SQLインジェクション対策とエスケープ処理は必須です。
2. パフォーマンスの重み: 保存処理のたびにDB通信を行うと、重い図面では保存が遅延します。もし大規模な処理が必要なら、データベースへの書き込みは「非同期」にするか、一度ローカルのテキストファイルにログを吐き出し、バッチ処理で流し込む設計がプロの選択です。
—
5. 最後に：エンジニアとしてのマインドセット
「自動化」の本質は、プログラムを書くことではありません。「人間が気を使わなくても、システムが勝手に正しい状態を維持してくれる仕組み」を作ることです。
今回紹介したイベントハンドリングの技術は、AutoCAD VBAにおける最も強力な武器の一つです。これが使いこなせれば、図面管理だけでなく、設計変更履歴の自動追跡、使用部材の自動集計など、あなたの業務は劇的に変わります。
最初はエラーが出るかもしれません。しかし、そのエラーこそが、あなたがCADの深淵に触れている証拠です。怖がらずに、一歩ずつコードを書き換えてみてください。
質問があれば、いつでもどうぞ。あなたの自動化の旅を、私は全力でサポートします。
