Thread: need Outlook 2002 macro to change mail format
View Single Post
  #10  
Old March 15th 06, 07:14 PM posted to microsoft.public.outlook.program_vba
Michael Bauer
external usenet poster
  
Posts: 435
Default need Outlook 2002 macro to change mail format
Am Wed, 15 Mar 2006 06:45:28 -0800 schrieb Maureen:

No, you first need to click on Forward.

This little sample creates the forward mail and switches the format:

Sub test111()
Dim mail As MailItem
Set mail = Application.ActiveInspector.CurrentItem.Forward
If mail.BodyFormat = olFormatHTML Then
mail.BodyFormat = olFormatRichText
Else
mail.BodyFormat = olFormatHTML
End If
End Sub

You could add your own button to the toolbar and run that code by clicking
the button.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.vbOffice.net --


Do you mean that when I open a message, there's a way to change the body
format before clicking on forward? I looked through all the toolbars and
didn't find that choice.
Ads