word批处理字符串替换

请尝试如下步骤：
1、键入ALT+F11打开VBA编辑器，选择菜单“插入-模块”；
2、粘贴如下代码：
Option Explicit
Sub BatchReplace()
Dim oDict, strKey

Set oDict = CreateObject("ScriptingDictionary")

oDictAdd "桃", "peach"
oDictAdd "苹果", "apple"
oDictAdd "香蕉", "banana"
oDictAdd "橙", "orange"
oDictAdd "梨", "pear"

'
' 在这里可以根据需要增加更多的替换规则
'

For Each strKey In oDictKeys
SelectionFindExecute FindText:=strKey, ReplaceWith:=oDict(strKey), Replace:=wdReplaceAll
SelectionStartOf wdStory
Next

MsgBox "完成！"
End Sub
3、根据需要在上述代码中注释地地方增加更多的替换规则；
4、键入F5运行看到“完成！”结束；
5、键入ALT+Q退出VBA编辑器返回Word文档，检查替换结果是否满足要求。

你好，是这样的。在word中的编辑选项中选择替换
然后会出来一个选项框，然后在上面的框里输入需要查找的文字等，比如你的，输入1
然后再输入需要替换的文字比如你的，输入11
然后选择全部替换就好了
然后就是这样 从一到五 这个需要一个数字一个数字的设置

Windows的自带的记事本，打开TXT，在菜单[编辑]-->[替换]，将要去掉的字符输出查找内容这一栏，替换为这一栏不填，就能把这些去掉。
同样在Word里也可以，用Word打开TXT，在编辑中也有替换这个功能。
如果要删除文件中所有<a href='xxxxxx'>这样的，可以在Word中打开这个文件，进入替换功能（按Ctrl+H），在查询内容这一栏写：<a href=''>，注意中间是单引号 星号 单引号，这是通配符查询，同时点开下方的[更多]按钮，把[使用通配符]选中。

1、打开word文档，在页面中输入含有空格的一段文字。

2、点击页面商法工具栏中的“查找替换”点击“替换”。

3、在d出的对话框中，将“查找内容”后输入一个空格，在“替换为”后不输入任何内容，点击“全部替换”。

4、d出对话框，提示完成替换，点击“确定”。

5、即可在页面中看到有空格的文字中的空格全部消失。

---