VBA マウスで指定した範囲を置換する方法ありますか？

文字列の置換作業を行いたいのですが、指定範囲がその都度異なります。
マウスで指定した範囲のみを置換するマクロはありますか？よろしくお願いします。

環境はexcel2007です。

No.2 ベストアンサー 回答者： tom04 回答日時： 2016/02/09 18:59

こんばんは！

すでに回答は出ていますので、参考程度で・・・
「○○」を「××」に置換するコードです。

Sub Sample1()
Selection.Replace what:="○○", replacement:="××", lookat:=xlPart
End Sub

の3行で大丈夫だと思います。m(_ _)m

この回答へのお礼

ありがとうございました。大変助かりました。

お礼日時：2016/02/10 09:26

No.1 回答者： bonaron 回答日時： 2016/02/09 15:35

> マウスで指定した範囲のみ

セル範囲のことでよろしいでしょうか？

マクロの記録では次のようになりました。

　　Selection.Replace What:="DE", Replacement:="○○", LookAt:=xlPart, _
　　　　SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
　　　　ReplaceFormat:=False

この回答へのお礼

早速のご回答ありがとうございました。大変助かりました。

お礼日時：2016/02/10 09:26