Visioを「操る」極意：起動引数を解析してバッチ処理とGUIを自在に切り替える
こんにちは。自動化の現場でVisioと格闘し続けてきた諸君。
「マクロの記録」で生成されたコードの迷宮を彷徨うのは今日で終わりにしよう。
Visioは単なる図面作成ツールではない。それは「オブジェクトという名の部品が重層的に積み重なった巨大な動的エンジン」だ。今回は、タスクスケジューラからの自動実行と、手作業によるGUI操作を1つのVBAプロジェクトでシームレスに切り替える、プロの「入り口」を伝授する。
1. Visioオブジェクトモデルの深淵を覗く
Visio VBAをマスターする鍵は、このヒエラルキーを脳内にインストールすることだ。
- Application: Visioそのもの。全ての根源。
- Document: ファイル。Stencilやデータソースを保持するコンテナ。
- Page: キャンバス。
- Shape: 描画される個体。マスターシェイプのインスタンス。
今回注目するのは、最上位のApplicationオブジェクトが持つ`CommandLine`プロパティだ。これを使うことで、Visioを起動する瞬間に「お前は今から人間と対話するのか？ それとも静かに裏で処理を行うのか？」という意志を伝えることができる。
—
2. 実装：起動引数解析モジュール
以下は、`Visio.Application`の起動オプションを解析し、モードを動的に切り替えるための設計だ。これを`ThisDocument`モジュールに記述する。
‘ 起動時に自動実行されるイベントプロシージャ
Private Sub Document_DocumentOpened(ByVal doc As IVDocument)
Dim cmd As String
cmd = Application.CommandLine
‘ デバッグ用: 引数をイミディエイトウィンドウに出力
Debug.Print “起動引数: ” & cmd
‘ モード判定
If InStr(1, cmd, “/auto”, vbTextCompare) > 0 Then
‘ 【バッチモード】GUIを非表示にし、サイレント処理を実行
Call RunSilentAutomation
‘ 処理終了後、保存して閉じる
Application.Quit
Else
‘ 【通常モード】通常のGUI操作を許可
MsgBox “通常モードで起動しました。作業を開始してください。”, vbInformation
End If
End Sub
‘ 実際の業務処理ロジック
Private Sub RunSilentAutomation()
On Error GoTo ErrHandler
‘ ここにシェイプの配置やDB連携処理を書く
‘ 例: ActivePage.DrawRectangle 0, 0, 1, 1
Debug.Print “バッチ処理完了”
Exit Sub
ErrHandler:
Debug.Print “エラー発生: ” & Err.Description
End Sub
このコードの「魂」
- `Document_DocumentOpened`: Visio起動時に必ず通る門だ。ここで分岐を行うのが最も安全で効率的。
- `/auto` 引数: ショートカットのリンク先を `”C:\Program Files\…\VISIO.EXE” “C:\YourPath\File.vsdm” /auto` とすることで、タスクスケジューラからの自動起動をトリガーできる。
- `Application.Quit`: バッチ処理の肝。自動化の際は必ずプロセスを終了させ、メモリリークを防ぐこと。これができない自動化エンジニアは「半人前」だ。
—
3. 陥りやすい「罠」と回避策
初心者が必ずハマるポイントを先回りして教えよう。
① 「マクロが無効です」の壁
タスクスケジューラで起動する際、セキュリティ設定でマクロがブロックされることがよくある。解決策は2つ：
1. 信頼できる場所: ファイルを置くフォルダを「信頼できる場所」として登録する。
2. レジストリ設定: VBAのマクロセキュリティレベルをプログラムで制御する（※推奨はしない。あくまで開発環境の管理が優先）。
② イベントが発生しない問題
`Document_DocumentOpened`は、ファイルが開かれた「直後」に発火する。しかし、Visioの起動処理そのものより早くコードが動こうとして失敗することがある。そんな時は`Application.Wait`で数秒待機させるか、`OnTime`メソッドを使って処理を少し遅延させるのが「職人の知恵」だ。
—
4. さあ、次のステップへ
今回のコードは、Visio自動化の第一歩に過ぎない。
次は、「外部のCSVやExcelからデータを読み込み、Shapeの`User.xxx`セルに値を流し込み、自動的に図面を再描画させる」という領域に踏み込んでみてほしい。
Visioの真価は、図を描くことではなく、「データから図を生成する」ことにある。
ここまで理解できれば、君はもう「マクロの記録」に頼るだけの初心者ではない。Visioという巨大なエンジンを、コードの力で自在に制御するアーキテクトだ。
迷ったときはいつでもここに帰ってきなさい。君のコードが、今日もどこかの誰かの業務を劇的に軽くしていることを信じている。応援しているよ。
