怎样把word文档中名字统一替换
⑴ word如何批量替换字符
要想自动化地一次过,采用VBA编程方式可以实现,编程思路是:
参考如下,你可以新建一个宏,将下列代码粘贴入该宏中,运行之后就可以圆满地实现你的目的了。设置了三个变量数组和一个循环变量,修改它们,可以实现其他目的。
代码如下:
=============================
Dim OriginalArr(1 To 4) As String '待查找的内容的数组,根据需要查找内容的数量,将4改变成相应的量即可
Dim ReplaceArr(1 To 4) As String '替换成的内容的数组,根据需要替换内容的数量,将4改变成相应的量即可
Dim TempString(1 To 4) As String '中间变量数组,根据需要替换内容的数量,将4改变成相应的量即可
Dim i As Integer
OriginalArr(1) = "张三" '内容可以根据需要自设置,其余同
OriginalArr(2) = "李四"
OriginalArr(3) = "王五"
OriginalArr(4) = "何六"
ReplaceArr(1) = "李四"
ReplaceArr(2) = "张三"
ReplaceArr(3) = "何六"
ReplaceArr(4) = "王五"
TempString(1) = "temp1"
TempString(2) = "temp2"
TempString(3) = "temp3"
TempString(4) = "temp4"
For i = 1 To 4 '根据数组OriginalArr的个数设置这里的循环变量的最大值
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = OriginalArr(i)
.Replacement.Text = TempString(i)
.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
For i = 1 To 4
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = TempString(i)
.Replacement.Text = ReplaceArr(i)
.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
============
⑵ 怎样批量替换文件夹中的多个word文档的命名。
1,首先从电脑上下载2345好压,下载后安装。
⑶ 求解:如何把word文档中的某个特定字全部替换为另一个字
1、以Word2010版本为例,如图要把该文档中的“读”字全部替换为“写”,首先全选要参与替换的文字;
⑷ 如何批量修改Word文档的文件名
1,首先从电脑上下载2345好压,下载后安装。
⑸ 怎么用word文档把一篇文章内的原人名替换成另一个名字(除了复制粘贴有没有更快捷的方法)
采用查找替换,很快的。在替换中把小红,替换为小溪,即可。编辑--替换--输入相关内容--确定。
⑹ 如何把word里的名字批量修改
先全选Word文档-右键-重命名-输入文件名确定,其他文档会自动改为名字+(1)开始的数字,下图Word文档就是重命名后的结果:
⑺ 在Word下,如何批量更改文件名
这个简单,可以批量在原文件名前、后增加字符,删除原来的字符,大小写转换,末尾加页码等
wordAID
⑻ 请问如何使用word,将文中的张三、李四等人名统一替换为王五
点Ctrl+H,进行查找并替换,先把查找输入张三,下面的替换全部写成王五,再把查找改为李四,下面替换王五不变,文档中所有数据就被替换。
高级→(勾选)使用通配符 查找输入 [张三李四] 替换框输入 王五,点全部替换