如何在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需要相同的單詞。