VBA ファイル名の取得｜フォルダ内のファイル名一覧を取得する方法
Const cnsDIR = "￥*.*" Dim strPath As String Dim strFilename As String Dim GYO As Long ' 先頭のファイル名の取得 strFilename = Dir(strPath & cnsDIR, vbNormal) ' ファイルが見つからなくなるまで繰り返す Do While strFilename "" ' 行を加算 GYO = GYO + 1 Cells (GYO, 1) .Value = strFilename ' 次のファイル名を取得 strFilename = Dir( ) Loop
Cells (GYO, 1) .Value = strFilename の部分が、エクセルシートのセルA〇にファイル名を表示させる部分です。
サンプルコード（最終形）
Option Explicit'********************************************************* ' 指定フォルダ内のファイル名一覧を取得 '********************************************************* Sub Get_FileName() Const cnsTitle = "ファイル名一覧取得" Const cnsDIR = "\*.*" Dim xlAPP As Application Dim strPath As String Dim strFilename As String Dim GYO As Long
Set xlAPP = Application ' フォルダの場所を指定する strPath = "D:\TEST\Data"
' フォルダの存在確認 --- 必要な場合のみ記述 --- If Dir(strPath, vbDirectory) = "" Then MsgBox "指定のフォルダは存在しません。", vbExclamation, cnsTitle Exit Sub End If
' 先頭のファイル名の取得 strFilename = Dir (strPath & cnsDIR, vbNormal) ' ファイルが見つからなくなるまで繰り返す Do While strFilename "" ' 行を加算 GYO = GYO + 1 Cells (GYO, 1).Value = strFilename ' 次のファイル名を取得 strFilename = Dir( ) Loop End Sub '----------------->------------------
以上で EXCEL VBAでフォルダ内のファイル名一覧を取得する方法 についての解説は終了です。 その他のVBA関連トピと合わせて役立ててください。
関連記事・広告 併せて読んでおくと便利VBA カレントフォルダの取得と設定・変更｜Excel VBA VBA・CurDir関数 VBAで カレントフォルダ名 を取得したり、設定（指定）したり変更（移動）したりする方法について解説します。CurDir関数 や ChDirステートメント などの使い方についても触れています。
VBA [ファイルを開く] ダイアログボックスを表示させる｜EXCEL VBA VBA・ダイアログボックス VBAで [ファイルを開く] ダイアログ ボックスを表示させ、選択したファイル名をテキストボックスに表示させるまでを解説。GetOpenFilenameメソッドを、使用例もサンプルコードを公開しています。
VBA「フォルダ選択」ダイアログを表示させる｜Excel VBA VBA・ダイアログボックス VBAを使い、ファイルではなく「フォルダ選択」をさせる ダイアログボックス を表示させ、ユーザーが選択した フォルダ名 を含むPathを テキストボックスに表示させる方法について解説。
VBAで空白行を削除する方法｜Excel VBA 高速技 VBA・Unionメソッド VBAを使って空白行の削除方法を解説します。Unionメソッド を使用して空白行を高速で一括削除する方法をサンプルコード付きで解説。ぜひ参考にしてください。
関連記事 エクセルの値が 日付になるトラブルを回避する方法エクセルに入力した値が意図せず「日付になる」。 こんな経験はありませんか？ 「1-2」あるいは「10/3」といった数字の間に記号を挟むような表記の場合、セルの値が「1月2日」「10月3日」のように日付 .
エクセルで「囲み文字」をつかう方法エクセルで入力した文字を〇で囲む。たとえば「㊙」（マル秘）みたいに。 では「新」や「旧」を〇で囲めるでしょうか？ エクセルでは、20までの数字や、マル秘のように 丸で囲むことの多い文字は .
エクセルで絵を描く｜図形を使った『ドラえもん』の描きかた最近、エクセルを使って描かれた絵画がよく話題になります。 それらを見てみると、どれも 超絶技巧 が駆使された、普通の人には簡単に描けないような作品が多いようです。 でも、絵を描くってもっと簡単で誰にで .
エクセルで図形を一括選択するエクセルシート上の 図形を一括選択 する。 図形やグラフを使うことは、資料づくりにおいて視覚的なわかりやすさをアップする重要なポイントのひとつです。 でも、せっかく使った図形も、位置が微妙にズレている .
エクセルで曜日を表示する書式や関数を整理してみたエクセルで 曜日 を表示させる場面は日常茶飯事ですね。 曜日の表示方法 には書式設定や関数などいくつかの方法がありますが、その選択を間違えるととても使い勝手の悪い（ムダな設定が多い）資料になってしまい .
Author: h1r0 （ヒロ） 誰にでもわかりやすいようにスクリーンショットを多く取り入れるようにしています（たまにないけど(爆)）。みなさんのお役に立てれば幸いです。 テーマに偏りはありますが、気軽に読んでいただけると嬉しいです。