Hi I have two accounts on my email (outlook) and I would like to use one account and bring up the signature for each account in VBA, each time I run this, the signature doesn't show. Can someone help me with my coding to bring up individual signature e.g. signature name "ScaffTechic"?
VBA Code:
Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
strbody = "Hi Accounts," & _
"<BR />" & "testing& _
"<BR />" & _
"<BR />" & _
"<BR />" & "Note: Testing 2" & _
"<BR />" & _
"<BR />" & _
"<br />" & "If you have any issues please do not hesitate to contact me." & _
"<br />"
On Error Resume Next
With OutMail
.SentOnBehalfOfName = [EMAIL]Test@test.com.au[/EMAIL]
.Display
.To = "testing4@doing.com.au"
.CC = [EMAIL]Testing@do.com.au[/EMAIL]
.BCC = ""
.Subject = "test" & " " & Format(Date, "mmmm yyyy") & " " & "Edmondson Park"
.HTMLBody = "<p style='font-family:calibri;font-size:14.5'>" & strbody & "" & "</p>" & .HTMLBody
'This is the code which is to send multiple attachments
.Attachments.Add "Invoice.pdf"
.Importance = 2 'Or olImprotanceHigh Or olImprotanceLow
.SendUsingAccount
.Display
End With