如何在 Word 文档中查找并替换多个词？

作者Siluvia修改日期2025-03-13

在 Word 文档中查找和替换词语是一项常见操作，尤其在需要对较长文档进行批量统一修改时显得尤为重要。然而，如果需要同时查找和替换多个词语，逐一操作将非常耗时。幸运的是，这里有更高效的方法，助您轻松完成这一任务。

本教程将介绍两种方法，教您如何在 Word 文档中同时查找和替换多个词：

使用 VBA 在 Word 中查找和替换多个词
 利用强大功能在 Word 中轻松查找和替换多个词

使用 VBA 在 Word 中查找和替换多个词

您可以通过 VBA 代码一次性在 Word 文档中查找并替换多个词。请按照以下步骤操作：

首先打开需要查找和替换多个词的 Word 文档，然后按下 Alt + F11，即可打开 Microsoft Visual Basic for Applications 窗口。

在 Microsoft Visual Basic for Applications 窗口中，点击插入> 模块。然后将以下 VBA 代码复制到模块窗口：

Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
    Dim xFind As String
    Dim xReplace As String
    Dim xFindArr, xReplaceArr
    Dim I As Long
    Application.ScreenUpdating = False
    xFind = InputBox("Enter items to be found here, separated by comma: ", "Kutools for Word")
    xReplace = InputBox("Enter new items here, separated by comma: ", "Kutools for Word")
    xFindArr = Split(xFind, ",")
    xReplaceArr = Split(xReplace, ",")
    If UBound(xFindArr) <> UBound(xReplaceArr) Then
        MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    For I = 0 To UBound(xFindArr)
        Selection.HomeKey Unit:=wdStory
        With Selection.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = xFindArr(I)
            .Replacement.Text = xReplaceArr(I)
            .Format = False
            .MatchWholeWord = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
    Next
    Application.ScreenUpdating = True
End Sub

按下 F5 即可运行代码。
在第一个 Kutools for Word 对话框中，输入多个要查找和替换的单词，并用逗号分隔，然后点击确定。
在第二个 Kutools for Word 对话框中，输入替换后的单词，同样用逗号分隔，然后点击确定即可。

注意：本示例中，“KTE”将被替换为“New”，“KTO”和“KTW”分别被替换为“Test”和“Finish”。您可根据实际需求进行修改。

利用强大功能，在 Word 中轻松查找和替换多个词

Kutools for Word 的批量查找与替换工具是一款强大实用的工具，可让您在同一文档或多个文档中轻松批量查找和替换多个文本。相比 Word 自带功能，该工具支持高效批量替换，显著节省您的时间和精力。

Kutools for Word，搭载 AI 功能🤖，提供超过 100 项实用功能，助您轻松完成各类任务。

立即下载

请按照以下步骤完成批量查找与替换：

启动 Microsoft Word，点击 Kutools > 批量替换。
在批量查找与替换窗口中，按照以下方式进行设置：
1. 单击添加行按钮，插入查找和替换字段。例如，如需替换三组不同文本，只需创建三行即可。
2. 在每一行的查找列中输入需要查找的文本，在新文本的替换列中输入要替换成的内容。
  提示：您还可以为每条查找和替换规则指定查找类型、查找范围、高亮颜色和格式，具体可参考下方截图中橙色高亮部分。
3. 单击按钮，选择文件或目录，即可将需要查找和替换的一个或多个文档添加进来。
4. 单击替换按钮，立即开始操作。