MathType 方程式の検索と置換

Question

すべての MathType 方程式でDetに変更することは可能ですか?det

Answer 1

使用している Word のバージョンと OS については触れられていませんが、次のマクロは Windows 上の Word 2010 および 2013 で動作します。

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.Executeメソッドのすべてのパラメータの説明は、ここ。