如何使用VBA在word文档中查找公式编辑器？

我正在VBA Excel中编写一个宏，用于对word文档进行一些数据处理。在此期间，我将整个文档的字体名称更改为Times New Roman。但我不希望对文档中的“公式编辑器”框应用相同的更改，因为它们的字体是Cambria Math。将字体更改为Times New Roman会导致数据不明确。

方程式对象在2007年后更改。在2007年之前，您可以通过声明字段对象来处理这些对象。比如说

未经测试

要从2007年起使用Equation对象，必须使用集合

您可以使用此代码更改所有方程式的字体

Sub Sample()
    Dim eqns As OMath

    For Each eqns In ActiveDocument.OMaths
        With eqns.Range.Font
            '
            '~~> Rest of the code
            '
        End With
    Next
End Sub

---

您使用的是哪个MS Office版本？我正在使用Office 2007非常感谢Siddharth。。。有没有什么方法可以让我找到方块图并改变它们的字体类型？？？你是如何插入方块图的？插入|形状？实际上，我正在将多个文档合并为一个，在合并时，字体、段落设置和行距都在变化。我需要纠正这一点。我正在尝试使用activedocument.shapes方法。有没有更好的办法？我想你需要问一个单独的问题：当你问的时候，解释一下具体的情况。当然，谢谢你的帮助。

Sub Sample()
    Dim eqns As OMath

    For Each eqns In ActiveDocument.OMaths
        With eqns.Range.Font
            '
            '~~> Rest of the code
            '
        End With
    Next
End Sub