[ VBA ] 指定フォルダ以下の全フォルダに含まれるファイルの一覧を取得したい | xxxx7

VBAで、あるフォルダの中にあるファイルの一覧を取得したい場合に、どう書けばいいかを解説します。VBAでフォルダの操作をすることはちょくちょくあるのですが、すぐに忘れてしまう自分へのメモです。 事前準備 VBAでフォルダやファイルを扱う場合、FileSystemObjectオブジェクトを使います。まずは、これを扱いやすくするために、参照設定を行います。 Visual Basic Editorを立ち上げ（Alt+F11）、メニューのツール⇒参照設定を選択します。そこから「Microsoft Scripting Runtime」を探し出してチェックを入れます。すると、scrrun.dllへのパスが表示され、参照設定が完了です。 フォルダ内のファイル一覧を取得する まずは、フォルダを指定したときに、そこに含まれるファイルの一覧を取得してみます。 Sub getFileList() Dim fso