如何在 Word 中選取所有公式？

Author: Amanda Li Last Modified: 2025-05-12

如何在 Word 中選取所有公式？本教程介紹了幾種高效選取所有公式的不同方法。

使用「查找和替換」選取所有公式
 使用 Kutools for Word 快速選取所有公式
 使用 VBA 選取所有公式

使用「查找和替換」選取所有公式

Word 中的「查找和替換」功能是選取公式的常用方法。

點擊 Home > Find > Advanced Find 以打開「查找和替換」對話框。
在「查找和替換」對話框中，點擊「更多」按鈕以顯示更多選項。
點擊 特殊格式 > 任意數字，然後點擊 查找下一個.
提示：您也可以直接在「查找內容」框中輸入“^#”，然後點擊「查找下一個」。

注意：此方法一次只能選取一個公式。要一次性選取全部公式，請使用下面介紹的 Kutools 或 VBA 方法。

使用 Kutools for Word 快速選取所有公式

Kutools for Word 提供了一鍵選取所有公式的最簡便方法。

Kutools for Word，內建人工智慧 ?，提供超過 100 種實用功能，簡化您的工作流程。

立即下載

點擊 Kutools > 段落 > 選取公式，即可一次性選取文檔中的所有公式。提示：如果您事先選取了文檔的一部分，則只會選取該部分中的公式。

結果

從選定範圍內選取的所有公式：
從整個文檔中選取的所有公式：

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

使用 VBA 選取所有公式

以下 VBA 程式碼可立即選取 Word 文檔中的所有公式。

按下 Alt + F11 打開 VBA 編輯器。

點擊插入 > 模組，然後將以下 VBA 程式碼複製並貼到模組窗口中。

Sub SelectAllEquations()
Dim xMath As OMath
Dim I As Integer
With ActiveDocument
    .DeleteAllEditableRanges wdEditorEveryone
    For I = 1 To .OMaths.Count
        Set xMath = .OMaths.Item(I)
        xMath.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone
    Next
    .SelectAllEditableRanges wdEditorEveryone
    .DeleteAllEditableRanges wdEditorEveryone
End With
End Sub