Excel（エクセル）活用コミュの【質問】フォルダ内のcsvファイルすべてに同じ処理を行う場合のプログラム

フォルダ内に200個のcsvファイルが入ってます．
そのフォルダ内すべてのcsvファイルに同じ処理をしたい場合のVBAのコードを教えて下さい．

今，ひとつひとつExcelファイルで開いて処理を行っているのですが，
Excelファイルで行っている処理は
１．８行目から２行分新しく行の挿入
２．８行目から４行５列分のデータを貼り付け
３．上書き保存
４．ｃｓｖファイルで保存
５．次のファイルにも同じ処理…

この処理の繰り返しです．
200個のファイルに手作業で行うのは時間がかかるため，プログラムを組んで行いたいと思ってます．
またこの処理を行わなければならないフォルダも20個あるため，全部で4000個のデータを手作業でしなければならない為，お力を貸していただきたいと思っています．
保存形式は「.csv」形式でなければ解析をかけられないため，csv形式での保存でお願いします．
よろしくお願いします．

コメント(7)

最初
全て
最新の40件

[1] mixiユーザー 12月09日 23:38

よくわからないのですが

「１．」の8行目から2行挿入ということは
元の8行目が10行目になるということですか？

「２．」の8行目とは行の挿入後の8行目ですか？
4行とは挿入後の8～11行目のことですか？
5列とはどの位置の5列なのでしょうか？
データはすべて5列(A～E列)という意味でしょうか？
貼り付けとは、どこに貼り付けるのでしょうか？

エクセルで普通にCSV保存しても、カンマ区切りになるだけで、
文字列にダブルクオーテーションが付きませんが、
数値ばかりなのでしょうか？

[2] mixiユーザー 12月09日 23:42

で、どこまでやられて何がわからないのでしょうか？

それとも業務の丸投げでしょうか？

＞プログラムを組んで行いたい
お気持ちがあるのでしたら最低限ルーチンワークの部分はマクロの記録で行ってみたり
ネットで調べてご自分のわからない部分をなるべく具体的な形でご質問されることをオススメします。

Яyo＆Ｊiさんが求めていらっしゃることは実現可能だと思いますが
ご自分が何もお分かりでないようでしたら目標に到達することが叶わないでしょう。

再度お調べいただいて具体的なご質問を提示していただけますようお願いいたします。

[4] mixiユーザー 12月10日 12:52

直感的に思うだけのことですが、全部で4000個のcsvをエクセルで処理すること自体に無理があるような気がします。

csvは要するにテキストファイルですから、テキストエディタにあるマクロ機能(そんなのかあるかどうかすら知りませんが)を使う方法がよいのかも。

なんちゃって、だいぶ無責任な発言ですが。

テキストに詳しいそうなKusakabeさん、何かご存知ありませんか？

反応するように半角のカナを入れようと思いますが、思いとどまりました。

[5] mixiユーザー 12月10日 13:09

皆様コメントありがとうございます！

勉強不足だと思うので、もう少し自分で勉強してから質問させていただきます

[6] mixiユーザー 12月10日 15:18

とりあえず１～３（４）まではマクロの記録をベースにちょっと手を加えればできると思います

あとはDIR関数使ってOPENメソッド CLOSEメソッドを使えばいいかと保存はファイル閉じる時のSAVEプロパティで

あとは延々とDo～Loopで… できると思いますので

他の方々のコメントを含めて
それらをキーワードに調べてみるといいと思います

[7] mixiユーザー 12月10日 17:21

> ゆめと @herenecoさん
ありがとうございます！
参考にしながら少しずつ勉強していきます

ログインすると、みんなのコメントがもっと見れるよ