Можно ли изменить Det
на det
во всех уравнениях MathType?
1 ответ
1
Вы не упомянули версию Word, которую вы используете, и в какой ОС, но следующий макрос работает для меня в Word 2010 и 2013 в 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
Описание всех параметров для Find.Выполнить метод можно найти здесь.