I'm using the following function to send Outlook Email
Public Function SendOutlookEmail(pasEmailAddress, pasEmailCC As Variant, pasEmailSubject As Variant, pasEmailMessage As Variant, pasSendEmail As Boolean) As Boolean
On Error GoTo Err_Proc
Dim NameSpace As Object
Dim EmailSend As...