|
EXCELにて、指定のファイルをインポートして
グループ別のファイル(100バイトで改行)を出力するVBAの作成をしています。
先頭行の1から8までが1グループでグループごとのファイルを出力したいです。
先頭行9は最終行
・指定のテキストファイル(100バイトで改行されている)
------------------------------
1山田・・・・・・・・・・・□□
2猿川・・・・・・・・・・・□□
2出川・・・・・・・・・・・・□
2田部・・・・・・・・・・・□□
8殿堂・・・・・・・・・・・□□
------------------------------ここまで1グループ
1前田・・・・・・・・・・・□□
2布施・・・・・・・・・・・・・
2川崎・・・・・・・・・・・□□
2舎熊・・・・・・・・・・・□□
2ラルド・・・・・・・・・・□□
2皆川・・・・・・・・・・・□□
8海堂・・・・・・・・・・・□□
------------------------------ここまで2グループ
・・・・・・・・・・・・・・・・
・・・・・・・・・・・・・・・・
・・・・・・・・・・・・・・・・
------------------------------ここまでnグループ
9・・・・・・・・・・・・・□□最終行
※□は半角スペース
イメージとしては、グループごとにグループ番号を付与し、(グループ1なら番号1)
それをファイル名別(out1.txt、out2.txt、・・・・outn.txt)にtxtで出力したいです。また最終行に半角スペースがある場合は半角スペースも含めたいです。
・出力ファイル
out1.txt
---------------------------------
1山田・・・・・・・・・・・□□
2猿川・・・・・・・・・・・□□
2出川・・・・・・・・・・・・□
2田部・・・・・・・・・・・□□
8殿堂・・・・・・・・・・・□□
---------------------------------
out2.txt
---------------------------------
1前田・・・・・・・・・・・□□
2布施・・・・・・・・・・・・・
2川崎・・・・・・・・・・・□□
2舎熊・・・・・・・・・・・□□
2ラルド・・・・・・・・・・□□
2皆川・・・・・・・・・・・□□
---------------------------------
outn.txt
---------------------------------
1○○・・・・・・・・・・・□□
2○○・・・・・・・・・・・・・
2○○・・・・・・・・・・・□□
2○○・・・・・・・・・・・□□
8○○・・・・・・・・・・・□□
---------------------------------
この仕様はエクセルで実現可能でしょうか。
よろしくお願いします。
|
|