如何在光标所在的MS-Word中运行VBA脚本？

Question

我有以下

Sub FormatOMaths()

    Dim formula As OMath

    For Each formula In ActiveDocument.OMaths
        formula.Range.Font.TextColor = RGB(255, 0, 0)
    Next

End Sub

这始终从文档的开头开始执行。如何修改脚本以从光标一直运行到文档末尾？谢谢，

Answer 1

我不会调用我的变量Formula，因为这是Excel自己使用的一个词。您可以探索Excel是否知道您的意思并使用您的意思而不是自己的意思。至于我自己，我不与Excel争论： - ）

Dim Frm As OMath

For Each Frm In ActiveDocument.OMaths
    With Frm.Range
        If .Start >= Selection.OMaths(1).Range.Start Then
            .Font.TextColor = RGB(255, 0, 0)
        End If
    End With
Next

如果您希望争辩：在代码中选择任何变量的名称，然后按F1。如果Excel使用相同的单词，您将被告知Excel需要相同的单词。