VBAでCSVファイルを分割したい
VBAを利用して、あるCSVファイルを一定のレコード数ごとに新しいファイルにファイル分割したいです。
やりたいことは、以下のようなイメージです。
関連サイトなどを参考に自分なりに取り組んでみましたが、なかなかうまくいきません。
VBAでなくても実現できそうですが、ここまでやったので勉強のためにもVBAでやりたいです。
サンプルコードなど教えていただけるとうれしいです。
ヒントでも結構ですので、よろしくおねがいします。
(2レコードずつ分割する例)
sample.csv
ヘッダ1,ヘッダ2,ヘッダ3,ヘッダ4
aaa@aa.aa,123,あいうえ,111-111
bbb@bb.bb,456,かきくけ,222-222
ccc@cc.cc,789,さしすせ,333-333
ddd@dd.dd,012,たちつて,444-444
eee@ee.ee,345,なにぬね,555-555
fff@ff.ff,678,たちつて,666-666
↓↓↓
☆sample_1.csv
ヘッダ1,ヘッダ2,ヘッダ3,ヘッダ4 →各ファイルにヘッダも入れたいです。
aaa@aa.aa,123,あいうえ,111-111
bbb@bb.bb,456,かきくけ,222-222
☆sample_2.csv
ヘッダ1,ヘッダ2,ヘッダ3,ヘッダ4
ccc@cc.cc,789,さしすせ,333-333
ddd@dd.dd,012,たちつて,444-444
☆sample_3.csv
ヘッダ1,ヘッダ2,ヘッダ3,ヘッダ4
eee@ee.ee,345,なにぬね,555-555
fff@ff.ff,678,たちつて,666-666
お礼
回答ありがとうございました。 今探したところ、秀丸が、マクロが組めて、さらに試用可能なようですので、これを使おうなかなと思いましたが、どのようにマクロを書けばいのかわかりません。 他のエディタでもかまいません。 この場合、どういうようにマクロを書けばいいのか、教えていただけませんか。
補足
結局VECTORでソフトを見つけたのでそちらの方法でやることにしました。