Convert all equations to "Normal Text"

		Microsoft Office Forums > Microsoft Word > Word VBA
Convert all equations to "Normal Text"

FAQ

Thread Tools

Display Modes

#13

12-03-2011, 02:57 PM

macropod

Windows 7 64bit Convert all equations to "Normal Text"

Office 2010 32bit

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,375

Hi Matin,

Try:

Code:

Sub MathObjReFormat()
Dim MathObj As Object
For Each MathObj In ActiveDocument.OMaths
  With MathObj
    .ConvertToNormalText
    .Range.Font.Name = "Times New Roman"
  End With
Next
End Sub

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

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Wierd symbols inplace of "space", "indentation" etc	aka.bhagvanji	Word	5	02-16-2012 11:50 AM
Partial highlighting of text in a row in "Final Showing Markup" setting	Redpoint	Word Tables	4	03-11-2011 04:29 PM
lines aren't visible in "normal" view	emrlaw	Word	2	05-12-2010 02:29 AM
"Microsoft Excel Application" missing in the "Component Services" on win08	sword.fish	Excel	0	02-26-2010 02:09 PM
merge field formatting problem with "text to be inserted before"	wissam	Mail Merge	0	12-13-2009 12:50 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 07:45 PM.