• 締切済み

フォルダ内のcsvファイルを全て開く

表題の件、教えてください。 csvファイルが入っているフォルダまでは関数で選択できるのですが、 csvファイルまでは、名前が複雑なため選択できません。 そこで、csvファイルを全て開いて、条件に合うファイルのみを 加工したいと思うのですがどうすればよろしいでしょうか。 どなたか分かる方回答お願い致します。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17070)
回答No.1

http://www.microsoft.com/japan/msdn/vbasic/migration/tips/File/ などのコードであるフォルダの全てのファイルのファイル名にアクセスできるから、拡張子.CSV以外は捨て(処理を飛ばし)、CSVの中の物だけ処理したら良い。ファイル名がわかっていて、CSVファイルを開く、レコードを読む方法(コード)もWEBのなかにあふれている。 http://www.excel.studio-kazu.jp/mag2/backnumber/mm20040622.html の Sub UCsvGet3() fname = "C:\Documents and Settings\kazu\My Documents\test2.txt" Open fname For Input As #1 r = 1 c = 2 Do While Not EOF(1) Input #1, kom1,kom2,kom3,kom4 の辺が参考になろう。

free_mees
質問者

お礼

違うサイトで最適な方法が見つかりました。 有難うございました。

関連するQ&A