（vba）フォルダの中の全てのファイル名を取得したい

質問

エクセル2003を使用しています。

「C:\Documents」にはいっている全てのファイル名をDebug.Printで取得したいのですが
For Each...Next ステートメントとDirと "*.*"を使うのはなんとなくわかるのですが
どうすればいいのかがさっぱりわかりません。
ご教授いただけないでしょうか？
よろしくお願いします。

回答No.2

imogasi · ベストアンサー

＞どうすればいいのかがさっぱりわかりません。
＞For Each...Next ステートメントとDirと "*.*"を使うのはなんとなくわかるのですが
まで大筋が判っておれば、できると思うが。つまるところ、習い覚えの経験が不足していると思う。
ーー
For Each...Next ステートメントとDirを使う、もＷＥＢ照会で知ったのでしょう。
大筋はわかっているようだから、さらに突っ込んで、どこがわからないのか絞って質問すべきです。
Ｇｏｏｇｌｅで「フォルダ　ファイル　Ｄｉｒ　ＶＢＡ」で照会したら
イヤと言うほどズバリに近いコード例が出ると思うよ。なぜＷＥＢ照会を活用しないのか。
http://officetanaka.net/excel/vba/tips/tips95.htm
ほか多数。
サブフォルダーを含まないものなら簡単。

お礼

その条件で調べればよかったですね。
ありがとうございます。

回答No.1

mitarashi

「vba フォルダの中の全てのファイル名を取得したい」
で検索すると、よりどりみどり見つかります。
手前味噌（死語？）ですが、
http://okwave.jp/qa4847039.html
のNo.2にサブフォルダー対応版のコードを回答してあります。

お礼

ありがとうございます。参考になりました。