Encontre e substitua em equações MathType

Encontre e substitua em equações MathType

É possível mudar Detpara dettodas as equações do MathType?

Responder1

Você não mencionou a versão do Word que está usando e em qual sistema operacional, mas a macro a seguir funciona para mim no Word 2010 e 2013 no 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

A descrição de todos os parâmetros do método Find.Execute pode ser encontradaaqui.

informação relacionada