☰

Suchen und Ersetzen in MathType-Gleichungen

tag-icon • tag-icon microsoft-word mathtype
Suchen und Ersetzen in MathType-Gleichungen

Ist es möglich, in allen MathType-Gleichungen zu Detändern ?det

Antwort1

Sie haben nicht erwähnt, welche Word-Version Sie verwenden und welches Betriebssystem Sie verwenden, aber das folgende Makro funktioniert bei mir in Word 2010 und 2013 unter Windows:

Dim eqn As OMath

Sub EquationSearchReplace()
    For Each eqn In ActiveDocument.OMaths
        eqn.ConvertToNormalText
        eqn.Range.Find.Execute FindText:="Det", ReplaceWith:="det", MatchCase:=True, Wrap:=wdFindContinue, Replace:=wdFindContinue
        eqn.ConvertToMathText
    Next
End Sub

Eine Beschreibung aller Parameter für die Methode Find.Execute finden SieHier.

verwandte Informationen