ワードの置換ですが

質問

Cells(1, "A") = Mid(Cells(1, "B"), 1, 1)
Cells(2, "A") = Mid(Cells(1, "B"), 2, 1)
Cells(3, "A") = Mid(Cells(1, "B"), 3, 1)
Cells(4, "A") = Mid(Cells(1, "B"), 4, 1)

上記の文字列を以下に置換したいのですが。

Cells(1, "A") = ""
Cells(2, "A") = ""
Cells(3, "A") = ""
Cells(4, "A") = ""

「検索と置換」で「ワイルドカードを使用する」にチェックを入れて、「検索する文字列」に　Mid*1)　を指定したのですが、マッチングしません。
なぜマッチングしないのでしょうか？

回答No.1

shikisaito · ベストアンサー

エスケープが必要だから、「Mid*1\)」が正しいのでは。

お礼

ありがとうございました。

回答No.2

papayuka

Mid*1\)
でどうですか？

マクロ（Excel?）をWordで編集しているの？

for i = 1 to 4
　Cells(i,"A") = Mid(Cells(1, "B"),i,1)
next i

とか、

for i = 1 to 4
　Cells(i,"A") = ""
next i

で良いような、、、、

お礼

ありがとうございました。