Equations in a word document can be referenced through the OMaths collection:

Sub Example1()
Dim i As Integer
For i = 1 To OMaths.Count
    'your code here
Next i
End Sub


You can reference each equation using the statement below:

OMaths.Item (i)


See also:

• Word VBA Creating Equations
• Word VBA Equations Linear/Professional Display
• Word VBA, Changing the Font Format of Characters in an Equations
• Microsoft (MSDN) OMath Object (Word)
• Word VBA, Delete Equations

If you need assistance with your code, or you are looking for a VBA programmer to hire feel free to contact me. Also please visit my website  www.software-solutions-online.com