VBScriptを掌握せよ：プロセスアタッチの極意と「無駄な増殖」を止める設計思想
業務自動化の現場において、VBScriptが未だに強力な武器である理由は、その「枯れた安定性」と「OSへの直結度」にある。しかし、多くのジュニアエンジニアが陥る致命的な罠がある。それは「毎度のごとくCreateObjectを叩き、バックグラウンドにゾンビプロセスを量産する」という悪癖だ。
メモリを食いつぶし、共有違反エラーを吐き、タスクマネージャーを埋め尽くす。そんな「野蛮なコード」は今日で卒業しよう。今回は、起動済みのプロセスを安全に捕まえ、必要に応じて新規生成する「賢い接続戦略」を伝授する。
—
1. なぜ「CreateObject」だけではいけないのか？
`CreateObject(“Excel.Application”)` を不用意に使うと、そのたびに新しいプロセスが立ち上がる。もしスクリプトを10回走らせれば、裏側で10個のExcelが待機し、リソースを圧迫する。
プロフェッショナルな設計において重要なのは、「既存のインスタンスが存在するかを確認し、あればそれに相乗りし、なければ生成する」というライフサイクル管理だ。これこそが、堅牢な業務自動化の第一歩である。
—
2. 核心となる実装：GetObjectとCreateObjectのハイブリッド
以下のコードは、Excelを例にした「安全なプロセスアタッチ」の定石だ。これをモジュール化して使い回すだけで、あなたのコードの品質は劇的に向上する。
‘ ———————————————————
‘ プロダクションレベル：Excelインスタンス接続関数
‘ ———————————————————
Function GetExcelInstance()
Dim objExcel
On Error Resume Next ‘ エラーをトラップして接続状態を判定
‘ 1. すでに起動しているインスタンスを取得しようと試みる
Set objExcel = GetObject(, “Excel.Application”)
If Err.Number <> 0 Then
‘ 2. エラーが発生＝起動していないので新規作成
Err.Clear
Set objExcel = CreateObject(“Excel.Application”)
‘ 新規作成時は可視化するなどの初期設定を行う
objExcel.Visible = True
End If
On Error GoTo 0 ‘ エラー制御を元に戻す
Set GetExcelInstance = objExcel
End Function
‘ — 実行例 —
Dim xlApp, wb
Set xlApp = GetExcelInstance()
‘ この時点で既に起動しているExcel、あるいは新規ExcelがxlAppに格納される
Set wb = xlApp.Workbooks.Open(“C:\Work\Data.xlsx”)
‘ 処理終了後のクリーンアップは必須。ただし、既存インスタンスなら終了させない判断が必要
‘ wb.Close True
‘ Set wb = Nothing
‘ Set xlApp = Nothing
このコードの「賢さ」のポイント
- On Error Resume Next の限定使用: `GetObject`が失敗するケース（＝プロセス不在）を「エラー」ではなく「フローの一部」として処理する。
- Err.Clear の徹底: エラー情報を保持したまま後続処理に進むと、予期せぬバグの温床となる。必ずクリアせよ。
- 保守性: この関数を共通ライブラリ化しておけば、ExcelだけでなくWordやPowerPointにも流用可能だ。
—
3. 現場で生き残るための「注意点」と「知見」
ゾンビプロセスを許すな
`GetObject` で接続した際、もしそのインスタンスがユーザーの手によって「非表示」で開かれていた場合、操作後に勝手に終了させるとユーザーの作業を邪魔することになる。
- 指針: `GetObject` で取得した場合はスクリプト終了時に `Quit` しない。`CreateObject` で生成した（＝自分が生んだ）インスタンスのみを `Quit` させるフラグ管理が、上級者の作法だ。
データベース連携の罠
ExcelをDB代わりに使う際、`GetObject` で接続すると、他の人が開いているExcelの「読み取り専用モード」に干渉する場合がある。
- 解決策: 共有環境でExcelを操作する場合は、必ず `Application.DisplayAlerts = False` をセットし、ダイアログによる自動停止を防ぐ設計にすること。
プロセスの「重み」を理解せよ
Excelオブジェクトの生成は、軽量なVBScriptの処理と比較して非常にコストが高い。ループの中で何度も `GetObject` を繰り返すような愚かなことはせず、「一度接続したら使い回す」ことを徹底せよ。
—
最後に：エンジニアとしての矜持
自動化とは、単にコードを動かすことではない。「OSのリソースをいかに効率的に使い、環境に負荷をかけずに目的を達成するか」という、システムとの対話である。
今回紹介した「プロセスアタッチ」は、派手な機能ではない。しかし、この些細な気遣いができるかどうかで、あなたの書くスクリプトが「使い捨ての汚いコード」になるか、それとも「社内で長く愛用される安定した基盤」になるかが決まる。
さあ、今すぐ自分のコードを見直せ。無駄なプロセスは、即刻葬り去るべきだ。
