Dim objOL As Object
Dim objMail As Object
Set objOL = CreateObject("Outlook.Application")
Set objMail = objOL.CreateItem(olMailItem)
strBody = "Attached, please find a copy of the " & NameofCompanyBolded & _
" letter for your review, and an electronic version of the Questionnaire. A paper copy of these documents is also being sent to you." & vbCrLf & vbCrLf & _
"Please let me know if you have any questions."
objMail.To = strTo
objMail.CC = strCC
objMail.BCC = strBcc
objMail.Subject = strSubject
objMail.body = strBody & objMail.body & vbCrLf & AfterSignatureCCs
I closed this question prematurely without the following question having been answered.
1) How do I set the font of the email text to Calibri 11 pt.?