こんにちは！日々の業務自動化、本当にお疲れ様です。
マクロの記録ボタンを押すだけの世界から一歩踏み出し、「自分の手でシステムをコントロールしたい」と願うあなたへ。今日は、地味ながらも実務で圧倒的な存在感を放つ、VBScriptとWSH（Windows Script Host）の粋なテクニックをお伝えします。
「ここをクリアすれば、VBScriptの基本はバッチリですよ！」と自信を持って言えるよう、コンソール画面の裏側まで徹底的に解説していきますね。
—
なぜ、黒い画面（コマンドプロンプト）のタイトルをいじるのか？
VBScriptを実務で使うとき、多くの人はダブルクリックで実行するか、タスクスケジューラやバッチファイルから裏側で動かしますよね。
ここで一つ、現場でよくあるストレスを思い出してください。
「いま、スクリプトがどこまで進んでいるのか分からない……止まっているのか、フリーズしているのか判断がつかない！」
GUI（画面のあるアプリ）であれば進捗バーを出せますが、CUI（黒い画面のCScript）のデフォルトは無機質なまま。
しかし、プロのエンジニアは知っています。「コマンドプロンプトのタイトルバーを動的に書き換えれば、ウィンドウを開かなくても、タスクバーを見るだけで一目で進捗が把握できる」ということを。
今日のゴールは、`WScript.Shell`オブジェクトを駆使して、処理のステータスに応じてウィンドウタイトルをリアルタイムに演出・制御する手法をマスターすることです。
—
基礎知識：WScript.Shell と CScript の関係
まず、私たちが普段何気なく使っている「VBScriptを実行する環境」の正体を整理しておきましょう。
1. CScript.exe
コンソール（コマンドプロンプト）上でスクリプトを動かすホストです。標準入出力（`WScript.Echo`など）がコンソールに直結します。
2. WScript.Shell
Windowsのシェル環境をVBScriptから操作するための最強のオブジェクトです。これを使うことで、OSへの命令（コマンド実行）や環境変数の取得、レジストリ操作が可能になります。
タイトルを書き換える仕組みは極めてシンプルです。
Windowsのコマンドプロンプトには `title <文字列>` というウィンドウタイトルを変更する標準コマンドがあります。VBScriptから `WScript.Shell` の `.Run` メソッドを使って、このコマンドを裏で実行してやればいいのです。
—
実践！進捗に応じてタイトルが動くスクリプト
それでは、実際のコードを見てみましょう。
以下のコードをメモ帳に貼り付けて、拡張子を `.vbs` （例: `progress_demo.vbs`）で保存してください。
‘ ==============================================================================
‘ ファイル名: progress_demo.vbs
‘ 概要: CScript実行時にウィンドウタイトルをリアルタイムに変更するサンプル
‘ ==============================================================================
Option Explicit
‘ 1. オブジェクトの生成（WSHのシェル機能を召喚する）
Dim objShell
Set objShell = WCreateObject_Safe(“WScript.Shell”) ‘ ※説明用の擬似表現です。正しくは下行
Set objShell = CreateObject(“WScript.Shell”)
‘ 2. 初期タイトルの設定
UpdateTitle objShell, “【処理開始】システム初期化中…”
WScript.Echo “処理を開始します…”
WScript.Sleep 2000 ‘ 2秒待機（処理のシミュレーション）
‘ 3. ステータス1: データ処理中
UpdateTitle objShell, “【実行中 (1/3)】顧客データを精査中…”
WScript.Echo “顧客データを読み込んでいます…”
WScript.Sleep 3000
‘ 4. ステータス2: ファイル出力中
UpdateTitle objShell, “【実行中 (2/3)】レポート生成・出力中…”
WScript.Echo “Excelレポートを作成しています…”
WScript.Sleep 3000
‘ 5. ステータス3: 終了処理
UpdateTitle objShell, “【実行中 (3/3)】一時ファイルのクリーンアップ…”
WScript.Echo “後片付けをしています…”
WScript.Sleep 2000
‘ 6. 完了
UpdateTitle objShell, “【完了】すべての処理が正常終了しました”
WScript.Echo “すべて完了しました。ウィンドウを閉じます。”
WScript.Sleep 2000
‘ 後片付け
Set objShell = Nothing
WScript.Quit
‘ ——————————————————————————
‘ 補助関数: タイトルを安全に更新するラッパー関数
‘ ——————————————————————————
Sub UpdateTitle(shellObj, titleText)
‘ “cmd.exe /c title …” を使ってウィンドウタイトルを書き換える
‘ 第2引数の “0” はウィンドウを非表示にするフラグ、第3引数の “False” は非同期実行（処理を待たずに次へ進む）
shellObj.Run “cmd.exe /c title ” & titleText, 0, False
End Sub
💡 実行する際の重要な注意点（ここテストに出ます！）
このスクリプトをエクスプローラーからダブルクリック（WScriptで実行）すると、ウィンドウがパッと開いては消え、タイトルの変化が見えません。
タイトルと進捗をコンソール上で確認するには、必ずコマンドプロンプトから `CScript` を明示して実行してください。
cscript //nologo progress_demo.vbs
コマンドプロンプトを開き、上記のように打ち込んで実行してみてください。タスクバーやウィンドウの上の端っこ（タイトルバー）に注目です。「初期化中…」から「顧客データ…」「レポート生成…」へと、流れるように文字が変化していくのが確認できるはずです！
—
コードの深掘り：プロが意識するポイント
ここで、エンジニアとしての視点をいくつかシェアしておきます。
1. `Option Explicit` はエンジニアの生命線
コードの1行目に書いた `Option Explicit`。これ、何の意味があるか分かりますか？
「変数の宣言を強制する」というルールです。これを書くことで、うっかりスペルミス（例: `objShll` と書いてしまうなど）をしたときに、VBScriptが即座にエラーを吐いて教えてくれます。大規模なスクリプトを書くときのデバッグ地獄を防ぐために、必ずすべてのスクリプトの先頭に書いてください。
2. `shellObj.Run` の引数の魔術
`Sub UpdateTitle` の中で使っている `.Run` メソッドの引数に注目してください。
shellObj.Run “cmd.exe /c title ” & titleText, 0, False
- 第1引数: 実行するコマンド（`cmd.exe /c title [タイトル名]`）
- 第2引数 (`0`): ウィンドウの表示スタイル。`0` にすることで、余計な黒いサブウィンドウがチラッとポップアップするのを完全に防ぎます。
- 第3引数 (`False`): コマンドの終了を待たない（非同期）。タイトルを変えるだけの細かい命令でメインの処理をブロック（足止め）させないため、ここを `False` にするのがスマートな設計です。
—
陥りやすい罠とエラー回避の知見
初心者がこの領域でハマりがちなポイントを先回りして解説します。
- 罠：ダブルクォーテーション (`”`) の中に文字列を埋め込むときの恐怖
タイトルにスペースや特殊文字を入れたいとき、文字列の結合（`&`）を忘れてシンタックスエラーになる人が続出します。
> NG例: `shellObj.Run “cmd.exe /c title 処理中: ” & statusName` （惜しい！）
> 変数や文字列を結合するときは、正しく `&` で繋ぎましょう。
- 罠：WScriptとCScriptの混同
「あれ、タイトルが変わらないぞ？」と悩む人の9割は、ダブルクリックで `WScript.exe`（GUIホスト）として実行しています。タイトル制御やリアルタイムなコンソール出力を伴うバッチ処理を作るなら、実行環境は常に CScript に固定するのが鉄則です。
—
まとめ
いかがでしょうか？
今回は、`WScript.Shell` と `cmd` の `title` コマンドを連携させ、VBScriptの実行中にウィンドウタイトルを動的に書き換えるテクニックを解説しました。
たかがタイトル、されどタイトル。
バックグラウンドで何をやっているのか可視化されるだけで、ツールとしての信頼性は跳ね上がりますし、何より「お、なんかエンジニアっぽい動的な処理メンテしてるぞ！」という悦に浸ることができます（笑）。
ここをクリアできれば、VBScriptのオブジェクト操作と外部プロセスの連携の基礎はもうバッチリです。ぜひ、あなたの現場の自動化ツールに組み込んで、周りをあっと言わせてください。
それでは、次の極限の知見でお会いしましょう！
