本記事はプロモーションを含みます

EXCEL VBA 保存後にWindowsをシャットダウンする方法

2021年2月1日

1. 問題点
2. プログラムに関して
- 2.1. プログラムコード本文
- 2.2. プログラムの詳細解説
3. 注意点

問題点

EXCEL VBAで、長時間動かすマクロだと、マクロ終了後にWindowsをシャットダウンして終了させたい時がある。作業開始時間がランダムで、１時間以上処理にかかる自動化対応のマクロとかだと終わったらパソコンの電源が切れて欲しいときがあるんですよね。退社時とか寝る前などにしかける時など。

プログラムに関して

プログラムコード本文

wb.Save
myWSH.Run "shutdown -s -f -t 10", 0, False
Application.Quit
ThisWorkbook.Close
Exit Sub

プログラムの詳細解説

wb.Save

作業中のワークシートを上書き保存します。

myWSH.Run "shutdown -s -f -t 10", 0, False

WSH（Windows Script Host）を読み出し、シャットダウンコマンドをたたきます。この設定ですと、ソフトやアプリがエラーを出したり（「保存しますか」などのミニウィンドウ系など）しても、問答無用に無視して、10秒後に終了する支持となります。なお、WSHは、VBAと近いですが、Windows側にあるスクリプト機能となり、VBAからWSHを呼び出して動作させています。
「-s」がシャットダウンの宣言（「-r」なら再起動）。「-f」がアプリケーションを強制終了する。「-t 10」がコマンド実行までの時間となります（単位は秒）。なお、Excel終了までに時間がかかりExcelエラーなどでどうしても終了しない場合は、10秒を20秒などに変更してもいいです。
10秒後というのがこのプログラムのポイントです。この10秒間は外部プログラムを読み出したとは言え、VBAでは本来できない並列処理をして、VBAが止まった後もシャットダウン処理はいきているいます。