當前位置:首頁 » 辦公資訊 » 怎樣把word文檔中名字統一替換

怎樣把word文檔中名字統一替換

發布時間: 2022-04-06 21:50:42

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,進行查找並替換,先把查找輸入張三,下面的替換全部寫成王五,再把查找改為李四,下面替換王五不變,文檔中所有數據就被替換。
高級→(勾選)使用通配符 查找輸入 [張三李四] 替換框輸入 王五,點全部替換

熱點內容
馬路上汽車的噪音在多少分貝 發布:2023-08-31 22:08:23 瀏覽:1742
應孕棒多少錢一盒 發布:2023-08-31 22:08:21 瀏覽:1239
標准養老金一年能領多少錢 發布:2023-08-31 22:05:05 瀏覽:1526
湖北通城接網線多少錢一個月 發布:2023-08-31 21:59:51 瀏覽:1605
開隨車吊車多少錢一個月 發布:2023-08-31 21:55:06 瀏覽:1366
京東付尾款怎麼知道前多少名 發布:2023-08-31 21:52:58 瀏覽:1687
在學校租鋪面一個月要多少錢 發布:2023-08-31 21:52:09 瀏覽:1823
2寸有多少厘米 發布:2023-08-31 21:50:34 瀏覽:1458
知道電壓如何算一小時多少電 發布:2023-08-31 21:46:20 瀏覽:1446
金手鐲54號圈周長是多少厘米 發布:2023-08-31 21:44:28 瀏覽:1619