Formatting email message

J

jh3016

I want to format an email message coming from Access to Outlook. I'm looking
to make bold, italics, etc.

Is there a code to do this?
 
D

David Lloyd

One alternative is to use HTML format and embed the HTML formatting tags in
the HTML body text. For example:

Public Function CreateEmail()

Dim ol As New Outlook.Application
Dim itm As Outlook.MailItem

Set itm = ol.CreateItem(olMailItem)

itm.To = "[email protected]"
itm.Subject = "Test Email"
itm.BodyFormat = olFormatHTML
itm.HTMLBody = "<HTML><Body><Font size=22 color=AA0033 Face='Freestyle
Script'><b><i>This is test.</i></b></Font></Body></HTML>"
itm.Save

End Function

--
David Lloyd
MCSD .NET
http://LemingtonConsulting.com

This response is supplied "as is" without any representations or warranties.


I want to format an email message coming from Access to Outlook. I'm
looking
to make bold, italics, etc.

Is there a code to do this?
 
Top