如何录制宏，对选中的文本区域执行查找替换而不是整个文档？

desence

我想在查找替换时，自己选择要替换的文本区域，而不是整个文档。每次都Ctrl+H比较麻烦，而且要不断修改替换的内容。
比如我第一次要替换空格，第二次要替换上下标，能不能分类做个宏，替换空格的宏、替换上下标的宏。而不是每次都重新输入查找替换的内容?

dajiahaoxinku12

楼主可以自己尝试录制宏啊     

desence

dajiahaoxinku12 发表于 2013-12-28 23:40
楼主可以自己尝试录制宏啊

尝试了，录制宏的时候鼠标不能选择，用键盘选择的区域在宏执行时是无效的，还是执行整篇文档。

desence

在论坛中搜索到了这个代码，解决问题了。

1. Sub 替换选定区域文字()
   
2.     Selection.Find.Execute findtext:="祖国", replacewith:="家园", Replace:=wdReplaceAll
   
3. End Sub

复制代码