Excel VBAの Dir関数は、指定したディレクトリ内のファイルやフォルダを取得するために使用します。具体的な使い方や注意点、サンプルコードを紹介します。
自分の実力を客観的にチェックしたい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集をご用意しました。
Excel VBA Dir関数の戻り値の利用
以下のようなシーンで利用されます。
・特定の条件に一致する最初のファイルやフォルダを取得する際に使用します。
・ファイルの存在を確認したり、一連のファイルを処理する際に利用します。
・Dir関数の戻り値は、条件に一致する最初のファイルまたはフォルダの名前です。条件に一致する次のファイルを取得するには、再びDir関数を呼び出す必要があります。
・条件に一致するファイルが見つからなかった場合、Dir関数の戻り値は空の文字列 ("") になります。
Excel VBA Dir関数の戻り値のサンプルコード
📌 「これ、自動化できたらラクなのに…」と思ったこと、ありませんか？
実はその作業、Excelマクロで簡単に自動化できるかもしれません。
「でもマクロって難しそう…」という方のために、完全初心者向けの入門記事をご用意しました！
👇実務で“そのまま使える”テンプレ付きで、コピペするだけ！
初心者向けエクセルマクロの作り方を解説｜コピペOK実務テンプレ付き
Option Explicit
Sub SearchFile()
Dim folderPath As String
Dim fileName As String
' ディレクトリの設定
folderPath = "C:\Users\User\Desktop\新しいフォルダー\"
' 指定のパターンに一致する最初のファイルを検索
fileName = Dir(folderPath & "*.txt")
' 一致するファイルが見つかったかどうかの確認
If fileName <> "" Then
MsgBox "Found file: " & folderPath & fileName
Else
MsgBox "No matching file found."
End If
End Subサンプルコードは、指定されたディレクトリ内で最初に見つかるtxtファイルの名前をメッセージボックスで表示しています。見つからない場合は、適切なメッセージを表示します。
「Excel VBAで自動化するコードのベースが習得できる解説書」
Excel VBAエキスパートベーシックとスタンダード、どちらを選べばいいか判断が難しい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集を用意しました。