秀丸 or エクセル：マクロ作成依頼

質問

マクロ初心者です。
ちょっと、急いでいます。できれば秀丸マクロでお願いしたいのですが、
エクセル（手持ちのバージョンは、2000）でもかまいません。

「○」か「×」かが入力されている行をチェックし、
縦に○が連続しているデータの脇にtab付きで「★」を置くマクロを教えてください。

×　　　×tab
×　　　×tab
○　　　○tab
×　　　×tab
○　→　○tab★
○　　　○tab
×　　　×tab
×　　　×tab
○　　　○tab★
○　　　○tab★
○　　　○tab
×　　　×tab

と、いう体裁にしたいのです。

回答No.1

kamicha1 · ベストアンサー

Excelであれば、マクロを使わなくても、以下のとおり数式でできますが、いかがですか？

B1の数式：
=IF(A1="○",IF(A2="○","○"&CHAR(9)&"★",A1&CHAR(9)),A1&CHAR(9))

　 A　　　 B
1　×　　　×tab
2　×　　　×tab
3　○　　　○tab
4　×　　　×tab
5　○　→　○tab★
6　○　　　○tab
7　×　　　×tab
8　×　　　×tab
9　○　　　○tab★
10　○　　　○tab★
11　○　　　○tab
12　×　　　×tab

お礼

ありがとうございます。
エクセルだとtabは不要だったのですが、おかげさまで、やりたい作業ができました。

補足

秀丸マクロのスクリプトも知りたいので、このまま締め切らずにおきます。

回答No.2

neko2

これでどうでしょうか

//おきかえマクロ
moveto 0,0;

while(1){
$maru1 = gettext(x,y,x+2,y);
$maru2 = gettext(x,y+1,x+2,y+1);
right 1;
insert "\t";
if(($maru1 == "○") && ($maru2 == "○")){
insert "★";
}
golinetop;
down;
if(!result )break;
}

// end

お礼

ありがとうございました。
お礼が遅くなって、申し訳ありませんでした。
こうして教えていただくと、なんだ、そうか、、、と納得できるスクリプトなのですが、自分で書くとなかなか上手く動かないのです。

補足

お二人とも、大変にありがとうございました。
やりたい作業に間に合ったわけですので、先にお答え頂いた方に20ということで、お許しください。