Skip to main content

How to select all equations in Word?

How to select all equations in Word? This tutorial will introduce you following methods to select all equations in word.

Select all equations with the Find and Replace
Select all equations with the VBA
Quickly select all equations with the Kutool for Word


Select all equations with the Find and Replace

The Find and Replace function in word is the most commonly way to select all equations.

Step 1: Click Home >Find > Advance Find to open the Find and Replace dialog box.

Step 2: In the Find and Replace dialog box, click More button to bring up more Search Options, and then click Special > Any Digit, and finally click the Find Next button. See screenshot:

Note: You can directly enter “^#” into the Find What text box and then click the Find Next button as below screenshot shown.

Note: This method can only select an equation at a time. If there are multiple equations in your document and you want to select them all at once, please apply the below methods. 


Quickly select all equations from a selection or the whole document:

The Select Equations utility of Kutools for Word helps you quickly selecting all equations from a selection or the whole document at once as the below screenshot shown. Download and try it now! (60-day free trail)


Select all equations with the VBA

The below VBA code can help you to select all equations from a Word document immediately. Please do as follows. 

Step 1: Press Alt + F11 to open the Microsoft Visual Basic for Applications window;

Step 2: In the Microsoft Visual Basic for Applications window, click InsertModule, then copy below VBA code into the Module window.

Step 3: Click Run doc-reverse-sign-6 button or press F5 to apply the VBA. Then all equations in current document are selected immediately.

VBA code: select all equations in document:

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

Quickly select all equations with Kutool for Word

It is the most convenient way to select all equations by using Kutool for Word. Only one click will help to select equations from a selection or the whole document. Please do as follows.

Kutools for Word : With more than 100 handy Word add-ins, free to try with no limitation in 60 days.

Click Kutools > Paragraphs  > Select Equations. See screenshot:

Note: if you make a selection in the document first, this tool will only select all all equations of the selection. Otherwise, all equations in current document will be selected at once.

You can see the results as below screenshots shown

Select all equations from a selection:

Select all equations from document:

If you want to have a free trial of this utility, please go to free download the software first, and then go to apply the operation according above steps.

Best Office Productivity Tools

Kutools for Word - Elevate Your Word Experience with Over 100 Remarkable Features!

🤖 Kutools AI Assistant: Transform your writing with AI - Generate Content  /  Rewrite Text  /  Summarize Documents  /  Inquire for Information based on Document, all within Word

📘 Document Mastery: Split Pages  /  Merge Documents  /  Export Selection in Various Formats (PDF/TXT/DOC/HTML...)  /  Batch Convert to PDF  /  Export Pages as Images  /  Print Multiple Files at once...

Contents Editing: Batch Find and Replace across Multiple Files  /  Resize All Pictures  /  Transpose Table Rows and Columns  /  Convert Table to Text...

🧹 Effortless Clean: Sweap away Extra Spaces  /  Section Breaks  /  All Headers  /  Text Boxes  /  Hyperlinks  /  For more removing tools, head to our Remove Group...

Creative Inserts: Insert Thousand Separators  /  Check Boxes  /  Radio Buttons  /  QR Code  /  Barcode  /  Diagonal Line Table  /  Equation Caption  /  Image Caption  /  Table Caption  /  Multiple Pictures  /  Discover more in the Insert Group...

🔍 Precision Selections: Pinpoint specific pages  /  tables  /  shapes  /  heading paragraphs  /  Enhance navigation with more Select features...

Star Enhancements: Navigate swiftly to any location  /  auto-insert repetitive text  /  seamlessly toggle between document windows  /  11 Conversion Tools...

👉 Want to try these features? Kutools for Word offers a 60-day free trial, with no limitations! 🚀
Free Download     Read More     Buy Now
 
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