在Word主體、頁眉和頁腳中查找和替換文字

Author: Siluvia Last Modified: 2025-05-12

通常，「查找與替換」功能可以幫助同時在Word文檔的主體、頁眉和頁腳中查找和替換特定的文字。您是否曾經嘗試過僅在Word文檔的頁眉和頁腳部分查找和替換文字？或者在同一個Word文檔或跨多個文檔中同時查找和替換多個不同的文字？本教程將展示一些實現這些操作的方法。

使用「查找與替換」功能在Word文檔中查找和替換相同文字
使用VBA代碼僅在頁眉和頁腳部分查找和替換相同文字
使用強大的功能同時查找和替換不同文字

使用「查找與替換」功能在Word文檔中查找和替換相同文字

在Word文檔中使用「查找與替換」功能非常容易。

1. 打開包含要替換文字的文檔，同時按下Ctrl + H鍵以打開「查找與替換」對話框。

2. 在「查找與替換」對話框中，在「替換」選項卡下，分別在「查找內容」和「替換為」框中輸入舊文字和新文字，然後點擊「全部替換」按鈕。請參見截圖：

Find and Replace dialog box with the Replace tab displayed

注意：您可以點擊「更多」按鈕來根據需要找到更多搜索選項。

3. 然後會彈出一個對話框，告訴您已經進行了多少次替換。點擊「確定」完成操作。

Success dialog box

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

如果您只想在文檔的頁眉和頁腳中查找和替換，本節中的方法可以提供幫助。

1. 打開要在頁眉和頁腳中查找和替換文字的文檔，按下Alt + 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

注意：在代碼中，請將“Find header text”和“Find footer text”替換為您想在頁眉和頁腳中查找的文字；並將“I’ve found header text”和“I’ve found footer text”替換為新的頁眉文字和頁腳文字。

3. 按下F5鍵運行代碼。然後頁眉和頁腳中的特定文字將被替換為新文字。

使用強大的功能同時查找和替換不同文字

Kutools for Word的批量查找與替換功能可以幫助輕鬆地在同一文檔或跨多個文檔中查找和替換不同的文字。

在應用此功能之前，請花幾分鐘下載並安裝它。

1. 啟動Microsoft Word應用程序，點擊Kutools Plus > 批量查找與替換。

Batch Find and Replace button on the Kutools Plus tab on the ribbon

2. 在「批量查找與替換」窗口中，您需要執行以下操作：

2.1 點擊按鈕 > 添加文件 或 添加文件夾 以添加需要查找和替換文字的文檔。
2.2 點擊「 添加行」按鈕以插入查找和替換字段。如果要同時查找和替換三個不同的文字，請創建三行。
2.3 在每一行中，在「查找」列中輸入要替換為新文字的現有文字，然後在「替換為」列中輸入新文字。
2.4 為每一行指定「查找類型」。
2.5 在「查找位置」列中，選擇要應用查找和替換的位置。該選項包括主文檔、頁眉和頁腳。您可以根據需要選擇其中之一、其中兩個或全部。
2.6. 點擊「替換」按鈕開始操作。請參見截圖：

Batch Find and Replace window

然後所有特定文字都將在所選文檔中被替換。

提示：您可以在「突出顯示」列中指定某種顏色，以便用背景顏色突出顯示結果。

Kutools for Word 是終極的 Word 增益工具，能夠簡化您的工作並提升文檔處理技能。立即獲取！

在Word文檔中同時查找和替換多個單詞
Word提供了「查找與替換」功能，可以查找所有實例的單詞或短語並同時替換為新單詞。但是，如果您想同時查找和替換不同的單詞，這個內置功能無法幫助。本文中，我們討論了一種VBA方法，可以在Word文檔中同時查找和替換多個不同的單詞。

在Word中跨多個文件進行搜索和替換
如果您有幾十個包含相同內容（如頁眉、頁腳、某些特殊單詞或數字）的Word文件，並且需要在這些文檔中替換相同的內容。如何才能更快速地完成這項工作呢？當然，您可以逐一打開這些文件來替換相同內容，但這樣做既耗時又麻煩。本教程將向您展示一種巧妙的方法，一次性在多個Word文檔中替換相同內容。

在Word中將硬回車替換為軟回車
如果您想通過將段落標記（硬回車）替換為手動換行符（軟回車）來格式化Word文檔。如何快速在Word中將硬回車替換為軟回車？本教程將向您展示幾種將硬回車轉換為軟回車的方法。

在Word中將軟回車替換為硬回車
如果您想通過將手動換行符（軟回車）替換為段落標記（硬回車）來格式化Word文檔。如何快速在Word中將軟回車替換為硬回車？本教程將向您展示幾種將軟回車轉換為硬回車的方法。