Hi b0x4it,

If you want to play with the font, you could use something like:
ActiveDocument.OMaths.Item(1).Range.Font.Name = "Courier New"

I don't know where the various properties, etc are documented. It's fairly easy to find out what there in the vbe, though, by typing 'omath' into the Object Browser. Or you can input 'ActiveDocument.OMaths' into a code module, then insert a period after it to get the pop-up for what available there. Likewise, you'll find another layer if you input 'ActiveDocument.OMaths.item(1)' into a code module, then insert a period after it, and so on.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]