【Visio VBA】破壊を許さない：OpenExメソッドによる「物理的な」読み取り専用の実装とメモリ管理の深淵
業務自動化の現場において、最も恐ろしいのは「資産であるマスター図面を、無自覚な誤操作で上書き保存してしまう」というヒューマンエラーだ。
特に共有サーバー上のVSDXファイルを扱う際、VBAの `Documents.Open` メソッドを安易に使うのは、セキュリティ的にも運用管理的にも「爆弾を抱えて歩く」に等しい。本稿では、`Documents.OpenEx` メソッドを駆使し、OSレベルでの保護を強制する堅牢な実装と、その背後に潜むメモリ管理の勘所を伝授する。
—
1. なぜ「OpenEx」でなければならないのか
通常の `Documents.Open` メソッドは、あくまで「ファイルを開く」という抽象的な動作を指す。一方、`OpenEx` はフラグ（`VisOpenSaveArgs`）を細かく制御できる。
読み取り専用で開くためのフラグ `visOpenRO` を指定することで、VisioアプリケーションはOSに対して「このプロセスは書き込み権限を要求しない」と明示的に通知する。これにより、アプリケーションが誤って `Save` メソッドをコールしたとしても、OS側で拒絶されるという「物理的な防波堤」が構築される。
2. 実装コード：堅牢なDocumentオープン制御
単に開くだけではプロの仕事とは呼べない。例外処理、オブジェクトの明示的な破棄、そして非表示処理（バックグラウンド処理）を考慮した実装が必須だ。
‘ —————————————————————————
‘ @brief VSDXを読み取り専用で開き、編集による破壊を物理的に防ぐ
‘ @param filePath フルパス
‘ —————————————————————————
Public Sub OpenDocumentReadOnly(ByVal filePath As String)
Dim doc As Visio.Document
Dim app As Visio.Application
Set app = Application
‘ エラーハンドリングの定石
On Error GoTo ErrorHandler
‘ 1. OpenExメソッドを利用した読み取り専用オープン
‘ visOpenRO: 読み取り専用
‘ visOpenDocked: ドッキングウィンドウを表示しない（最適化）
Set doc = app.Documents.OpenEx(filePath, Visio.VisOpenSaveArgs.visOpenRO)
‘ 2. ここで図面の加工やPDF出力を行う処理を記述
‘ 例: Debug.Print doc.Name
‘ 3. 処理完了後、保存せずに閉じる
doc.Close
ExitRoutine:
‘ 4. メモリの明示的解放（伝説的エンジニアの嗜み）
If Not doc Is Nothing Then Set doc = Nothing
Exit Sub
ErrorHandler:
MsgBox “致命的なエラーが発生しました: ” & Err.Description, vbCritical
Resume ExitRoutine
End Sub
3. シニアエンジニアが意識すべき「メモリの重力」
VBAのガーベジコレクションを過信してはならない。特にVisioのオブジェクトモデルは、階層が深くなるほどCOMインターフェースの解放漏れが致命的なメモリリーク（プロセス残留）を引き起こす。
- `Set obj = Nothing` の哲学: スコープを抜ける前に必ず `Nothing` を代入せよ。特に大規模な図面を連続で処理する場合、この一行が数百MBのメモリ消費を左右する。
- イベントの抑止: `Application.ScreenUpdating = False` と `Application.AlertResponse = 0` を組み合わせ、バックグラウンドでの処理速度を極限まで引き上げろ。特にPDF出力を行う際、GUIの描画は最大のボトルネックとなる。
4. 応用：システム連携とレガシー保守の知見
この手法を応用し、マスター図面を「テンプレート」として扱うフローを構築することで、システム間連携の堅牢性が飛躍的に向上する。
1. Read-Onlyで開く（物理的保護）
2. `SaveAs` で一時フォルダにコピーを作成
3. 一時コピーを編集し、PDFエクスポート
4. 一時コピーを破棄
この手順を踏めば、どれだけ複雑な自動化ロジックを組んでも、マスターファイルが汚染されることはない。
終わりに：技術は「守り」から始まる
自動化エンジニアにとって、最高のコードとは「動くコード」ではない。「壊れないコード」だ。今回紹介した `OpenEx` による読み取り専用制御は、その第一歩に過ぎない。
Visioという、歴史と複雑さが同居する巨大なCOMオブジェクトを御する際、常に「もしここでエラーが起きたら？」と問いかけ続けろ。その疑念こそが、堅牢なシステムを構築するための唯一の羅針盤となる。
何かあればまた聞こう。君の自動化プロセスに、破壊が入り込む隙間などあってはならない。
