カーソルがどこから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があなたが意味することを知っているかどうかを調べ、独自の意味ではなくあなたの意味を使用するかもしれません。あなたのコードを押しF1に任意の変数の名前を選択します。自分のためとして、私はあなたが主張したいん場合は、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 

と議論していません。同じ単語を使用する場合、Excelに同じ単語が必要な情報が通知されます。