Votre message ne me rajeunit pas !
Mes conclusions sont les suivantes :
Dans une équation, on peut insérer 21 structures, qui correspondent à l'énumération WdOMathFunctionType.
Par défaut, on insère du texte au format math (qui correspond à la constante wdOMathFunctionText).
On n'a donc pas besoin d'utiliser
OMath.Functions.Add pour insérer du texte au format math.
La macro suivante montre la différence entre les deux formes de texte dans une équation.
Code:
Sub TexteMathTexteNormal()
Dim monEq As OMath, maFonction As OMathFunction, maPlage As Range
ActiveDocument.Range.Delete
Set monEq = ActiveDocument.OMaths.Add(Selection.Range).OMaths(1)
'on insere du texte au format math : on n'a pas besoin de la méthode Add
Set maPlage = monEq.Range
maPlage.Text = "type=wdOMathFunctionText"
'on insere du texte au format normal : on utilise la méthode Add
maPlage.Collapse (wdCollapseEnd)
maPlage.Text = "type=wdOMathFunctionNormalText"
Set maFonction = monEq.Functions.Add(Range:=maPlage, Type:=wdOMathFunctionNormalText)
End Sub
Si on met un point d'arrêt à la dernière instruction, on voit bien que le texte "type=wdOMathFunctionNormalText" est inséré au format math, avant d'être converti en texte normal.