Add Signature to Email Macro

[O177812]

Hi,

Wrote a macro that creates a file and then emails the file to the appropriate parties.
I am trying to make sure my signature is included in the email but I have been stumped.
Below was my last attempt:

------------------------------------------------------------------------

Dim OutMail As Object, signature As String

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

signature = OutMail.HTMLBody

With OutMail
.To = "scott.hogan@company.com, adam.landman@company.com"
.CC = "shelly@company.com"
.Subject = "XXXX - OPEN ORDER DASHBOARD - " & Format(Now, "mm-dd-yyyy")
.HTMLBody = "Hi Company Team," & Chr(10) & "<br>" & "<br>" & _
Chr(10) & "Attached is an updated dashboard reflecting your open orders. " & "<br>" & _
Chr(10) & "Please review at your earliest convenience and let me know if I can provide any clarity or answer any questions you may have." & Chr(10) & Chr(10) & "<br>" & "<br>" & _
Chr(10) & "Have a great week!" & vbNewLine & signature
With .Attachments.Add("https://xxxxxx.sharepoint.com/sites...ustomer Pricing/Company/1_Open Order Reports/" & "Company Dashboard " & Format(Now, "m.dd.yy") & ".xlsx")
.DisplayName = Replace(.DisplayName, "%20", " ") '<<<<<
End With
.Display
End With

End Sub

----------------------------------------------------------------------------

Please help!

 

[starl]

it's the HTML in your signature. Put the new body in its own variable, don't use your signature variable. Like this:

   tmpBody = "Hi Company Team," & Chr(10) & "<br>" & "<br>" & _
         Chr(10) & "Attached is an updated dashboard reflecting your open orders. " & "<br>" & _
         Chr(10) & "Please review at your earliest convenience and let me know if I can provide any clarity or answer any questions you may have." & Chr(10) & Chr(10) & "<br>" & "<br>" & _
         Chr(10) & "Have a great week!"
   .htmlbody = tmpBody & vbNewLine & .htmlbody