跳到主要內容

在Word文檔,頁眉和頁腳中查找和替換文本

通常,“查找和替換”功能可幫助同時查找和替換Word文檔的正文,頁眉和頁腳中的特定文本。 您是否曾經嘗試過僅在Word文檔的頁眉和頁腳部分中查找和替換文本? 還是要同時在一個Word文檔中或跨多個文檔查找和替換多個不同的文本? 本教程顯示了一些實現它們的方法。

使用“查找和替換”功能查找和替換Word文檔中的相同文本
僅使用VBA代碼在頁眉和頁腳部分中查找和替換相同的文本
借助出色的功能同時查找和替換不同的文本


使用“查找和替換”功能查找和替換Word文檔中的相同文本

在Word文檔中使用“查找和替換”功能很容易。

1.打開包含要替換單詞的文檔,然後按 按Ctrl + H 鍵同時打開 查找和替換 對話框。

2。 在裡面 查找和替換 對話框中的 更換 標籤中,分別將舊文本和新文本輸入到 查找內容 和R.代替 框,然後單擊 “全部替換” 按鈕。 看截圖:

注意: 你可以點擊 更多 按鈕可根據需要找到更多搜索選項。

3.然後會彈出一個對話框,向您顯示已進行了多少次替換。 請點擊 OK 完成。


僅使用VBA代碼在頁眉和頁腳部分中查找和替換相同的文本

如果只想在文檔的頁眉和頁腳中查找和替換,本節中的方法會有所幫助。

1.打開您將找到的文檔,並替換頁眉和頁腳中的文本,然後按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口中,單擊 插入 > 模塊 然後將下面的VBA代碼複製到“模塊”窗口中。

VBA代碼:僅在頁眉和頁腳中查找和替換文本

Sub FindAndReplaceOfHeaderAndFooter()
'Update by Extendoffice 20190805
    Dim xDoc As Document
    Dim xSelection As Selection
    Dim xSec As Section
    Dim xHeader As HeaderFooter
Dim xFooter As HeaderFooter
On Error Resume Next
    Set xDoc = Application.ActiveDocument
    For Each xSec In xDoc.Sections
        For Each xHeader In xSec.Headers
            xHeader.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found header text" 'Enter the old header text here!
               .Replacement.Text = "I've found header text" 'Enter the new header text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xHeader
        For Each xFooter In xSec.Footers
            xFooter.Range.Select
            Set xSelection = xDoc.Application.Selection
            With xSelection.Find
                .Text = "I've found footer text" 'Enter the old footer text here!
                .Replacement.Text = "I've found footer text" 'Enter the old footer text here!
                .Wrap = wdFindContinue
                .Execute Replace:=wdReplaceAll
            End With
        Next xFooter
    Next xSec
    xDoc.ActiveWindow.ActivePane.Close
    If xDoc.ActiveWindow.View.SplitSpecial = wdPaneNone Then
        xDoc.ActiveWindow.View.Type = wdPrintView
    Else
        xDoc.ActiveWindow.View.Type = wdPrintView
    End If
    xDoc.Activate
End Sub

注意: 在代碼中,請替換“查找標題文本“和”查找頁腳文字”,以及要在頁眉和頁腳中找到的文本; 並替換“我發現標題文字“和”我已經找到頁腳文字”和新的頁眉文本和頁腳文本。

3。 按 F5 鍵來運行代碼。 然後,頁眉和頁腳中的特定文本將替換為新文本。


借助出色的功能同時查找和替換不同的文本

批量查找和替換 的特點 Kutools for Word 可以幫助您輕鬆地在一個文檔中或同時在多個文檔中查找和替換不同的文本。

在應用此功能之前,請花幾分鐘 首先下載並安裝.

1.啟動Microsoft Word應用程序,單擊 Kutools 加 > 批量查找和替換.

2。 在裡面 批量查找和替換 窗口,您需要執行以下操作。

  • 2.1點擊 按鈕> 添加文件 or 添加文件夾 添加您需要在其中查找和替換文本的文檔。
  • 2.2點擊 添加行 按鈕插入查找和替換字段。 如果要同時查找和替換三個不同的文本,請創建三行。
  • 2.3在每一行中,輸入要用新文本替換的現有文本。 發現 列,然後將新文本輸入到 更換 列。
  • 2.4指定 搜索類型 每行。
  • 2.5在 查找 列,選擇將查找和替換應用到的位置。 這包括 主要文件, 頁腳 在這個部分。 您可以根據需要選擇其中之一,其中兩個或全部。
  • 2.6。 點擊 更換 按鈕開始操作。 看截圖:

然後,所有特定的文本將在選定的文檔中替換。

小提示: 您可以通過在“突出顯示”列中指定某種顏色來用背景顏色突出顯示結果。

  如果您想免費試用(60天)此實用程序, 請點擊下載,然後按照上述步驟進行操作。


相關文章

在Word文檔中同時查找和替換多個單詞
Word提供了“查找和替換”功能以查找單詞或短語的所有實例,並同時用新單詞替換它們。 但是,如果您想同時查找和替換不同的單詞,此內置函數將無濟於事。 在本文中,我們討論的是一種VBA方法,用於同時在Word文檔中查找和替換多個不同的單詞。

在Word中搜索和替換多個文件
如果您有幾十個包含相同內容(例如頁眉,頁腳,某些特殊單詞或數字)的Word文件,則需要在Word中的那些文檔中替換相同的內容。 您如何更輕鬆地快速完成工作? 當然,您可以一個個地打開這些文件以替換相同的內容,但這將很耗時且麻煩。 本教程將向您展示一種巧妙的方式來一次替換Word中多個文檔中的相同內容。

用Word中的軟收益替換硬收益
如果要通過用手動換行符(軟返回)替換段落標記(硬返回)來格式化Word文檔的格式。 如何在Word中快速用軟收益替換硬收益? 本教程將向您展示幾種將硬收益轉換為軟收益的方法。

用Word中的硬性回報替換軟性回報
如果要通過用其中的段落標記(硬返回)替換手動換行符(軟返回)來格式化Word文檔的格式。 如何在Word中用硬性報酬快速替換軟性報酬? 本教程將向您展示幾種將軟收益轉換為硬收益的方法。


推薦的Word生產力工具

 

Kutools For Word - 超過 100 個 Microsoft Word 進階功能,節省 50% 的時間

  • 複雜和重複的操作可以在幾秒鐘內完成一次處理。
  • 跨文件夾一次將多個圖像插入Word文檔。
  • 將文件夾中的多個Word文件合併並合併為所需順序。
  • 根據標題1,分節符或其他條件將當前文檔拆分為單獨的文檔。
  • 在Doc和Docx,Docx和PDF之間轉換文件,用於常見轉換和選擇的工具集合, 等等...
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations