人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excel2002 VBAのOPENコマンドで、指定したディレクトリー内にあるcsvファイルをすべて 読み込む方法をお教えください

Open ファイル名 For Input As #1
Do While Not EOF(1)
Input #1, BUF(1), BUF(2), BUF(3), BUF(4), BUF(5), BUF(6), BUF(7), BUF(8), BUF(9), BUF(10), BUF(11)
?処理?

Loop

上記のファイル名部分を ディレクトリ内全
CSVに対して行いたいのですが
以上、よろしくお願いします。

●質問者: じゃりてん
●カテゴリ:コンピュータ
✍キーワード:as CSV LOOP open VBA
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● gong1971
●60ポイント ベストアンサー

"C:\data\csv"以下のcsvファイルだとして...。


ChDir "C:\data\csv"

dd = Dir("C:\data\csv\*.csv")

Do Until dd = ""

質問文にある処理

dd = Dir()

Loop


こんな感じです。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ