Dir()

 あるフォルダーに存在するすべてのファイル名を取得するには、Dir関数にワイルドカード(*)を指定します。

 下のサンプルコードは、CドライブにあるWorkフォルダー内のすべてのExcelブック(*.xlsx)の名前をアクティブシートに書き出します。Dir関数にワイルドカードを指定すると、まずそのワイルドカードに一致するファイル名が返ります。次に、Dir関数の引数を省略してDir()を実行すると、同じワイルドカードを指定したものと見なして検索を実行し、次に一致するファイル名が返ります。そして、一致するすべてのファイル名が返ると、Dir関数は空文字("")を返します。

 そこで、Dir関数が空文字を返すまでループを繰り返せば、該当するすべてのファイル名を取得できます。

[画像のクリックで拡大表示]