Outlook CBA changing Fonts

[Sean McPoland]

Hi all,

I have an extremely simple macro as follows:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If Item.Class > olMail Then Exit Sub
Item.Body = Replace(Item.Body, "My N ame" & vbCrLf, "My Name, CISA" & vbCrLf)
End Sub

However: when it executes it changes the MESSAGE PARAGRAPH FONT and
CHARACTER Size from what I have it set as (Verdana 10) to Calibri 12.

This shouldn't happen!

Can anyone help please...

Many thanks in advance,
Sean

 

[Michael Bauer [MVP - Outlook]]

If that's an html formatted e-mail, you need to write into the HTMLBody
property, and use html tags.

--
Best regards
Michael Bauer - MVP Outlook

: Outlook Categories? Category Manager Is Your Tool
: VBOffice Reporter for Data Analysis & Reporting
: <http://www.vboffice.net/product.html?pub=6&lang=en>


Am Sat, 8 Nov 2008 06:23:03 -0800 schrieb Sean McPoland: