Excel2010コマンドプロンプトのDIRコマンドを使ってファイル名一覧を作成する方法をご紹介しています。同じようなことを、Excelマクロでやりたいということも実務では、よくあります。Applications)標準のDir関数を使ったマクロをご紹介します。ファイルが存在しません。"にファイル名一覧を作成しました。Sub上記のマクロを実行すると、フォルダを指定するためのダイアログが表示され、ファイルが存在していれば、ブックの先頭にシートを挿入して、A5セルから下に向かってファイル名一覧が作成されます。Application.FileDialog(msoFileDialogFolderPicker)指定されたフォルダのフルパスを変数に格納します。dlg.SelectedItems(1)Dir関数を使って、指定されたフォルダ内の一つ目のファイル名を取得して、変数・f_nameに格納します。Loop文で、Dir関数が値を返さなくなるまでループをまわし、A5セルから下にファイル名を書きだしていきます。DirLoopDir関数は、引数を指定せずに呼ばれるたときに、直前に指定されたのと同じ引数で、既にみつかっているファイルを除外したファイル名を返す、という仕様を利用して、指定されたフォルダ内のファイル名を順番に取得しているマクロです。パソコンを使っていると日々ファイルが増えていきます。インストラクターのネタ帳FileSystemObjectを使った、指定したフォルダ内の、ファイル名一覧を作成するExcel(エクセル)マクロをご紹介しています。インストラクターのネタ帳VBAのDir関数を使うと、あるフォルダーにExcelファイルが存在するかどうかを判定できます。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。