秀丸マクロ(条件で改行を入れたい)

質問

カンマで区切られて半角英数字の単語が並んでいます。
これが複数あります。一行がひとつの文章です。

[例]今回は4文章
(1)aaaa,bbbb,cccc,dddd,eeee,ffff,gggg,hhhh,ii,jjjjj,kkkkkkk,ll,mmm,nnnn,ooooooooo,ppp,qqqqq,rrrrr,sssssssss,tt,uuu,vvvvvv,wwwwww,xxxxxxxxxx,yyyyyyy,zzzzzzz,
(2)sdfjk,gkgjglgk,sdfk,weoir,gokjs,ahsio,lglgljs,laksjf,alsdkfj,peori,jsdfk,ksdj,erutosdgksdf,gkdfg,kdf,czxnmsk,sdflk,ijhuhg,fygdr,dvsdv,qwe,zxc,sgggj,dwu,sdfg,bcjwifgk,sjfhkfhjv.rigjf,djshs,gjdhjk,gjdhj,qazsx,dcfr,
(3)sldk,weto,wetzdf,obkgfj,sdfkjjk,qweoj,wrj,qel,sgsoi,ertuioer,asdfhjk,wer,osldkjgk,
(4)ghksadf,sdf,qweroiu,sdfksdfsdf,sdfglkjsdfglkj,eroiwer,dfgkjdfglk,dfgk,werpoi,sdfjas,ghodfgk,sdfho,asdfhk,asdfkjsl,ghsldkf,weigjkdfg,sdafh,gerk,sdfjowe,vbfhyr,cdenj,

■やりたいこと
ひとつの文章ごとに一行を70文字以内で折り返したい

■決まり事
・折り返す場所はカンマのところ
・70文字目より多ければその一つ前のカンマで折り返す
・通常は頭に(1)等の番号はついていません。例の説明としてつけました。

できあがりの結果は、下記のようになります。

aaaa,bbbb,cccc,dddd,eeee,ffff,gggg,hhhh,ii,jjjjj,kkkkkkk,ll,mmm,nnnn,
ooooooooo,ppp,qqqqq,rrrrr,sssssssss,tt,uuu,vvvvvv,wwwwww,
xxxxxxxxxxxx,yyyyyyy,zzzzzzz,

sdfjk,gkgjglgk,sdfk,weoir,gokjs,ahsio,lglgljs,laksjf,alsdkfj,peori,
jsdfk,ksdj,erutosdgksdf,gkdfg,kdf,czxnmsk,sdflk,ijhuhg,fygdhgdr,
dvsdv,qwe,zxc,sgggj,dwu,sdfg,bcjwifgk,sjfhkfhjv.rigjf,djshs,gjdhjk,
gjdhj,qazsx,dcfr,

resldk,weto,wetzdf,obkgfj,sdfkjjk,qweoj,wrj,qel,sgsoi,ertuioer,
asdfhjk,wer,osldkjgk,

ghksadf,sdf,qweroiu,sdfksdfsdf,sdfglkjsdfglkj,eroiwer,
dfgkjdfglk,dfgpsk,werpoi,sdfjas,ghodfgk,sdfho,asdfhk,asdfkjsl,
ghsldkf,weigjkdfg,sdafh,gerk,sdfjowe,vbfhyr,cdenj,

秀丸マクロでできますでしょうか。
どうぞよろしくお願いいたします。

回答No.1

Wr5

>秀丸マクロでできますでしょうか。

出来るか？出来ないか？で答えるなら、出来るでしょう。

1)golinetopで行頭にカーソルを移動。
2)カンマの位置を記憶しておく変数を初期化。
3)codeでカーソル位置の文字コードを取得。
3-a)','だったらその位置を変数に格納する。
3-b)改行だったら次の行の先頭に移動させて2)へ。
3-b2)次の行がない場合は終了。
4)rightでカーソルを右に移動する。
4-b)カーソル位置(x)が70未満ならば3)へ。
4-c)カーソル位置(x)が70になったら最後に記憶したカンマ位置まで移動してinsertreturnで改行を挿入して2)へ。

って感じでしょうかね。

お礼

早速の回答、どうもありがとうございました。
1～4まで
ひとつずつ、調べながら作ってみます。

感謝です!
ありがとうございました。