Need help with fonts/attributes for Outlook Email body

jdp103

Registered User.
Local time
Yesterday, 20:19
Joined
Sep 26, 2003
Messages
46
I have some code that attaches a report to an email. What I need to be able to do is make the body of the email's text bold and red, but I can't figure out how to do it! Can someone help??

Here is the code:
Private Sub Command3_Click()
Dim rptName As String
Dim bytchoice As Byte
Dim strmsg As String
Dim intoptions As Integer
Dim tmpdate As Date

strmsg = "Are you sure you want to send this report?"
intoptions = vbQuestion + vbYesNo
bytchoice = MsgBox(strmsg, intoptions)

If bytchoice = vbYes Then
tmpdate = InputBox("Enter date of Release")
rptName = "Release Summary Document - Walt"
DoCmd.SendObject acSendReport, rptName, acFormatRTF, InsertEmailAddressHere, , , "IMPORTANT: WALT Release Summary - " & tmpdate, "Important WALT Release Notice Attached. Please distribute to EVERY WALT User in Your Department. Changes are scheduled to be moved into Production on " & tmpdate & ".", False
Else
If bytchoice = vbNo Then
Cancel = True
End If
End If
End Sub
 

Users who are viewing this thread

Back
Top Bottom