Thanks for the tip; works great!:
Sub FormatPlainTextMail()
Dim colCB As CommandBars
Dim objCBB As CommandBarButton
Dim objDoc
Set colCB = ActiveInspector.CommandBars
Set objCBB = colCB.FindControl(, 5604)
If Not objCBB Is Nothing Then
objCBB.Execute
End If
Set objCBB = colCB.FindControl(, 5565)
If Not objCBB Is Nothing Then
objCBB.Execute
End If
Set objDoc = ActiveInspector.WordEditor
objDoc.Kind = wdDocumentNotSpecified
objDoc.Content.AutoFormat
End Sub
"Sue Mosher [MVP-Outlook]" <(E-Mail Removed)> wrote in message
news:evxH5dW$(E-Mail Removed)...
> The first two steps can only be done with CommandBars techniques. See
> http://www.outlookcode.com/d/tips/commandbarfun.htm
>
> For Step 3, you can use Inspector.WordEditor to return a Word Document
> object and then use the Document.AutoFormat method.
>
> "Sriram N A" <(E-Mail Removed)> wrote in message
> news:csiniu$sa3$(E-Mail Removed)...
> >I have found it useful to use the WordMail AutoFormat option to read
plain
> > text emails (typically newsletters). Using Outlook 2003.
> >
> > I am attempting to setup a button which will carry out the equivalent of
> > the
> > following steps in the UI for me:
> >
> > 1. Edit | Edit Message
> > 2. Format | Rich Text
> > 3. Format | AutoFormat -> Autoformat Now -> General Document
> >
> > There does not appear to be a means of doing this in VBA - or is there?