Thread: [Solved] Convert all equations to "Normal Text"
View Single Post
 
Old 05-16-2011, 04:52 AM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2007
Administrator
  
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default
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]
Reply With Quote