跳到主要內容

如何在Word中選擇所有方程式?

如何在Word中選擇所有方程式? 本教程將向您介紹以下選擇單詞中所有方程式的方法。

使用查找和替換選擇所有方程式
使用VBA選擇所有方程式
使用Kutool for Word快速選擇所有方程式


使用查找和替換選擇所有方程式

Word中的查找和替換功能是選擇所有方程式的最常用方法。

步驟1:點擊 首頁 >發現 > 提前查找 打開“查找和替換”對話框。

步驟2:在 查找和替換 對話框,單擊 更多 按鈕以顯示更多“搜索選項”,然後單擊 特別 > 任何數字,最後點擊 查找下一個“ 按鈕。 看截圖:

備註:您可以直接輸入“^#“ 進入 尋找什麼 文本框,然後單擊 查找下一個“ 按鈕,如下圖所示。

注意: 此方法一次只能選擇一個方程式。 如果您的文檔中有多個方程式,並且您想一次選擇它們,請應用以下方法。 


從所選內容或整個文檔中快速選擇所有方程式:

選擇方程式 的效用 Kutools for Word 可以幫助您快速從一個選擇中或整個文檔中快速選擇所有方程式,如下面的屏幕截圖所示。 立即下載並試用! (60-天免費試用)


使用VBA選擇所有方程式

下面的VBA代碼可以幫助您立即從Word文檔中選擇所有方程式。 請執行以下操作。 

步驟1:按 Alt + F11鍵 打開 Microsoft Visual Basic for Applications 窗口;

步驟2:在 Microsoft Visual Basic for Applications 窗口中,單擊 插入模塊,然後將以下VBA代碼複製到“模塊”窗口中。

步驟3:點擊 跑 文檔反向符號 6 按鈕或按下 F5 應用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

使用Kutool for Word快速選擇所有方程式

這是使用Kutool for Word選擇所有方程式的最便捷方法。 只需單擊一下,就可以幫助您從選區或整個文檔中選擇方程式。 請執行以下操作。

Kutools for Word :擁有100多個方便的Word加載項, 免費試用,不受限制 60.

點擊 庫工具 >  > 選擇方程式。 看截圖:

注意: 如果您首先在文檔中進行選擇,則此工具將僅選擇該選擇的所有方程式。 否則,將立即選擇當前文檔中的所有方程式。

您可以看到如下所示的結果截圖

從選擇中選擇所有方程式:

從文檔中選擇所有方程式:

如果您想免費試用該實用程序,請轉到 免費下載軟件 首先,然後按照上述步驟進行操作。

最佳辦公生產力工具

Kutools for Word - 透過 Over 提升您的文字體驗 100 顯著特點!

🤖 Kutools 人工智慧助手:用人工智慧改變你的寫作 - 生成內容  /  重寫文字  /  總結文件  /  查詢資料 基於文檔,全部在Word中

📘 文件掌握: 分頁  /  合併文件  /  以各種格式匯出選擇(PDF/TXT/DOC/HTML...)  /  批次轉換為PDF  /  將頁面匯出為圖像  /  一次列印多個文件...

內容編輯: 批量查找和替換 跨多個文件  /  調整所有圖片的大小  /  轉置表行和列  /  將表格轉換為文字...

🧹 輕鬆清潔: 移開 多餘的空間  /  分節符  /  所有標題  /  文本框  /  超鏈接  / 如需更多拆卸工具,請前往我們的 刪除組...

創意插入: 插入 千位分隔符  /  複選框  /  單選按鈕  /  QR Code  /  條碼  /  對角線表  /  公式標題  /  圖片說明  /  表格標題  /  多張圖片  / 發現更多 插入組...

🔍 精準選擇:精確定位 特定頁面  /    /  形狀  /  標題段落  / 增強導航功能 更多 選擇功能...

星級增強: 快速導航至任何位置  /  自動插入重複文字  /  在文檔視窗之間無縫切換  /  11 轉換工具...

???? 想嘗試這些功能嗎? Kutools for Word 提供了 60天免費試用,沒有任何限制! 🚀
 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
For Each tempTable In ActiveDocument.InlineShapes When I copy and paste "The VBA code to selectall equations" given above in word 2010, when saving it, the computer shows "Run time error 13 type mismatch" . What should I do?
This comment was minimized by the moderator on the site
When I copy and paste "The VBA code to selectall equations" given above in word 2010, when saving it, the computer shows "Run time error 13 type mismatch" . What should I do?
This comment was minimized by the moderator on the site
When I copy and paste "The VBA code to selectall equations" given above in word 2010, when saving it, the computer shows "Run time error 13 type mismatch" . What should I do?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations