VBA エラー「‘CurrentDirectory’ メソッドは失敗しました: ‘IWshShell3’ オブジェクト」が発生した場合の対処法

  • 作成日 2022.11.17
  • vba
VBA エラー「‘CurrentDirectory’ メソッドは失敗しました: ‘IWshShell3’ オブジェクト」が発生した場合の対処法

VBAで、エラー「‘CurrentDirectory’ メソッドは失敗しました: ‘IWshShell3’ オブジェクト」が発生した場合の対処法を記述してます。「Windows Script Host Object Model」を参照設定していないことが原因です。

環境

  • OS windows11 64bit

エラー全文

以下の「WScript.Shell」を使用したコードで発生

Set sh = CreateObject("WScript.Shell")

エラー画像

原因

「Windows Script Host Object Model」を参照設定していないため

対処法

「ツール」>「参照設定」より、「Windows Script Host Object Model」にチェックを入れます。