word中如何替换一些特殊符号

1.word中如何替换一些特殊符号

从网页上复制一些文章到Word中，往往会带有好多垂直向下箭头的符号，这就复是软回车符号（Word中软回车是同时按住shift+enter得来的）， 软回车占用了Word很多的空间，而且暴露出文章是copy来的。对于删除这些软回车，可以采取批量删除的方法。

小提示：“^制l”表示软回车，“^p”表示硬回车，“^t”表示制表符，“^m”表示手动分页符，“^+”表示长划线bai（—），“^=”表示短划线（–），“^l”表示人工换行符，^n表示分栏符。

快速批量删除软回车

点击菜单栏中的“编辑”→“替换” ，在“查找内容”里面输入^l， “替换为”里面不输入任何字符，然后点“全部替换” ，就可以删除整个文档里面的软回车了。

把软回车替换成硬回车

如果遇到段du与段之间有两个回车，就可以利用替换成一个回车。 在“查找内容”里面输入^p^p， “替换为”里面输入^p，两个回车就变为一个了。

不必zhi要的回车造成的空行就可以编辑”→“替换” ，在“查找内容”里面输入^p， “替换为”里面不输入任何字符，然后点“全部dao替换” ，就可以删除整个文档里面的硬回车造成的空行了。

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

用查找替换就可以了

录了个宏，做了一些修改，看是不是你需要的，数组里内容可以添加

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