2017-10-06 3 views
0

Ich habe folgendeWie VBA-Skript in MS-Word von wo der Cursor ist?

Sub FormatOMaths() 

    Dim formula As OMath 

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

End Sub 

Dies immer von Anfang an beginnen des Dokuments ausführt. Wie kann ich das Skript so ändern, dass es von wo der Cursor bis zum Ende des Dokuments läuft? Danke,

+0

Sie müssen den Bereich am Cursor mit dem Bereich am OMath-Objekt vergleichen – jsotola

Antwort

0

Ich würde meine Variable Formula nicht aufrufen, weil das ein Wort ist, das sich Excel selbst benutzt. Sie könnten untersuchen, ob Excel weiß, was Sie meinen und Ihre Bedeutung anstelle seiner eigenen verwenden. Was mich betrifft, ich argumentiere ich nicht mit 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 

Falls Sie nicht möchten, argumentieren: Name jedes Variable im Code ein und drücken Sie F1 auswählen. Sie werden darüber informiert, wofür Excel dasselbe Wort benötigt, wenn es dasselbe Wort verwendet.