こんにちは。
VBAを使うことが、頻繁ではないですが、ちょくちょくあり、
その都度「コードってこれで良かったっけ？」「どう書くんだっけ？」
となることが、しばしば、、、あります。
その時その時で調べて、確認して、コードを書いてとしていたので、
自分が使いやすいように、コードをコピペで使えるようにまとめます。
内容
表題の通りの機能です。
フォルダを選択してフォルダ内のファイルについて、一つずつ全て MsgBox で表示させていきます。
このコードだけでは、あまり意味は無いですが、まとめておくことで、
ファイル処理を行う際、このコードをベースに出来ると判断し、まとめておきます。
コード
以下にコードを示します。
fSelecteFolder は、以前投稿しましたので参照します。
実行すると
実行すると、以下のようになります。
選択するフォルダを、以下の図にしめす「サンプルデータ」フォルダだっとします。
フォルダの中には、
・211205_aa2.txt
・211205_aaa.txt
・211206_aa4.txt
・211215_a.txt
というファイルを作ってあります。
実行すると、フォルダ選択ダイヤログが起動します。
サンプルデータを選択して、「OK」ボタンを押すと、
フォルダ内のファイル名を、MsgBoxで表示します。
MsgBox を表示するコード部分に、ファイルごとに実施したい処理を書けば、
フォルダ内のファイルが、たくさんある場合は、楽になります。
