Question

请问如何在WORD中批量替换多个字符呢？

我需要把WORD中20多个字符都替换，比如把：台灯、电视、冰箱、洗衣机、电脑、微波炉、加湿器、空调、电烤箱、空调，这10个词，都替换成“家用电器”。
（还要解释一下，由于需要经常处理不同的WORD文件，每个WORD文件中被替换的字符可能只有2,3个，这10个词可能不会都同时在一个WORD文件里）
期待高手解答，不尽感谢！
可能我没有说清楚，
如何使用VBA代码来批量替换呢？ 因为每天要处理很多个WORD文件，手动查找替换的方式太繁琐。我用录制宏的办法一个一个查找替换，不过这样执行效率太低，代码非常臃肿，希望高手能给个好的办法。
这个代码每次只用来处理一个WORD文件即可，不是同时处理多个WORD文件。

Answer 1

用查找替换就可以了
录了个宏，做了一些修改，看是不是你需要的，数组里内容可以添加
Sub 查找替换()
Dim arr()
arr = Array("台灯", "电视", "冰箱","洗衣机","电脑","微波炉")
For i = 0 To 5
With Selection.Find
.Text = arr(i)
.Replacement.Text = "家用电器"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next i
End Sub