エクセルマクロでファイルを検索する

質問

ある指定したディレクトリに指定した名前のファイルが存在するかどうか調べるにはどんなマクロコマンドを使えばよろしいでしょうか

回答No.2

kozo_k · ベストアンサー

Sub kensaku()

Dim buf as String
buf = Dir("C:\My Documents\kensaku.txt")
If buf = "" Then
　MsgBox "ファイルはありません"
　Else
　MsgBox "ファイルが見つかりました"
　End　If
End sub

ではどうでしょうか（試していませんが）
ただしファイル名はkensaku.txtで:\My Documentsにあるものとします。

お礼

試してみました。GOODです。
ありがとうございました。

回答No.3

hana-hana3

下記を参考してください。
Dir(Path & FileName) で、結果が取得できます。

参考URL：

http://www.microsoft.com/japan/msdn/columns/office/office09072000.asp,http://www.asahi-net.or.jp/~zn3y-ngi/YNxv9192.html

お礼

ありがとうございました。
VBAの参考書を2冊ばかり買いましたが、書いてないことが多いですね

回答No.1

imogasi

http://okweb.jp/kotaeru.php3?q=361759
で、似たような問題に回答しています。

お礼

ありがとうございます