If objDoc.ProtectionType = WdProtectionType.wdAllowOnlyReading Then objDoc.UnProtect You need to set a reference to the Word object model in the VB Editor's Tools > References menu. This macro selects the opened message and changes the entire message to use a uniform font size (12pt in my example) and saves the change. If objInsp.EditorType = olEditorWord Then Select a block of text while composing a message and run the macro. To use, open the VBA Editor (Alt+F11) and paste the code into a module. I tested this macro in Outlook 2010 and Outlook 2013 it should also work in Outlook 2007.
See How to use Outlook’s VBA Editor for help using the editor, setting security levels, and signing macros.