Create macros in Outlook 2007

  • Thread starter Thread starter cte67
  • Start date Start date
C

cte67

The site
http://turtleflock-ol2007.spaces.live.com/blog/cns!C1013F1F9A99E3D8!579.entry
gives a nice clear description of how to create a macro in Outlook 2007.
What I tried is:

Sub Blue()
Dim objDoc As Word.Document
Dim objSelection As Word.Selection
On Error Resume Next
Set objDoc = Application.ActiveInspector.WordEditor
Set objSelection = objDoc.Windows(1).Selection
objSelection.Font.Color = wdColorBlue
Set objSelection = Nothing
Set objDoc = Nothing
End Sub

Unfortunately, this does not work. I am using Outlook 2007, and have the
latest updates (12.0.6504.5000) SP2 MSO (12.0.6425.1000) ... am running
WinXP, Service Pack 3.
 
The site
http://turtleflock-ol2007.spaces.live.com/blog/cns!C1013F1F9A99E3D8!579.entry
gives a nice clear description of how to create a macro in Outlook 2007.
What I tried is:

Sub Blue()
Dim objDoc As Word.Document
Dim objSelection As Word.Selection
On Error Resume Next
Set objDoc = Application.ActiveInspector.WordEditor
Set objSelection = objDoc.Windows(1).Selection
objSelection.Font.Color = wdColorBlue
Set objSelection = Nothing
Set objDoc = Nothing
End Sub

Unfortunately, this does not work. I am using Outlook 2007, and have the
latest updates (12.0.6504.5000) SP2 MSO (12.0.6425.1000) ... am running
WinXP, Service Pack 3.
Click to expand...

microsoft.public.outlook.program_vba is a better newsgroup for programming
questions.
 
Back
Top