マクロを使って置換させるには？

質問

マクロの事で質問です。（エクセル2003を使用）

セルG5に
「私は●●●が好きです」

と入力されています。

セルG12に
「貴方」「彼氏」「彼女」「太郎」「次郎」

などのワードが入力されていたとします。

マクロを使って●●●部分を置換させたいです。

「新しいマクロの記録」を使ってみたのですが、どうしても出来ません。

どなたか詳しい方教えてください。

よろしくお願いします。

回答No.1

n-jun · ベストアンサー

Sub try()
With Range("G5")
.Value = Replace(.Value, "●●●", Range("G12").Value)
End With
End Sub

１回目は置換できるけど、２回目以降はどうするのかな？

お礼

回答ありがとうございました。
思い通りに出来ました！
１度だけ出きれば今回の目的は達成です。