Bold Code

[Stockwell43]

Hello,

In my email code (see below), I would like for this line to be bolded:
"Please provide the following on the above reference loan"

Is this possible?

Private Sub cmdSendEmail_Click()
On Error GoTo EH

Dim SendTo As String, SendCC As String, MySubject As String, MyMessage
As String
SendTo = ""
SendCC = ""
MySubject = "Additional Information Needed"
MyMessage = vbCr & vbCr & Me.CustLast & ", " & Me.CustFirst & vbCr &
Me.LoanNumber.Name & ": " & Me.LoanNumber & _
vbCr & "Please provide the following on the above reference loan" & ": "
& vbCr & Me.AddInfo

If Not IsNull(Me.StatusUpdate) Then
MyMessage = MyMessage & vbCr & Me.StatusUpdate.Name & ": " & vbCr &
Me.StatusUpdate
End If
DoCmd.SendObject acSendNoObject, , , SendTo, SendCC, , MySubject,
MyMessage, True


EH:
If Err.Number = 2501 Then
MsgBox "This email message has not been sent. Message has been
cancelled."
End If
End Sub

 

[Tom van Stiphout]

On Wed, 9 Jul 2008 06:54:03 -0700, Stockwell43

I don't think that's possible with DoCmd.SendObject, although you
could experiment by in Outlook setting your default email format to
HTML and then writing:
<b>Please provide the following on the above reference loan</b>

If that does not work, you have to use the Outlook object model to
create such HTML email.

-Tom.

 

[Stockwell43]

Hi Tom,

Thanks for replying. I guess I thought it might be an easy fix so the
sentence would stand out more when it is sent to the recipient. It's not
really a need, more of a want or wishlist type thing.

Thank you anyway for trying!!!