I am using the below Sub script as part of the a script that creates a PDF from Excel and attaches that PDF to an email via outlook and sends out the email via Outlook. What I was looking to do is add another attachment (already created and saved word doc) to that email, so that when the script creates the PDF and attaches it to an outgoing email it will also add a copy of the word doc.
Any help is appreciated
Public Sub Send_Email(toEmail As String, fileAttachment As String)
Static olApp As Object
Dim olMsg As Object
If olApp Is Nothing Then Set olApp = CreateObject("Outlook.Application")
Set olMsg = olApp.CreateItem(0)
With olMsg
.To = toEmail
.CC = "myeamil.com"
.Subject = "On-boarding Process"
.HTMLBody = " Please review the attached form (those with existing... accounts will need to be updated..."
.Attachments.Add fileAttachment
.Send
End With
End Sub
Any help is appreciated
Public Sub Send_Email(toEmail As String, fileAttachment As String)
Static olApp As Object
Dim olMsg As Object
If olApp Is Nothing Then Set olApp = CreateObject("Outlook.Application")
Set olMsg = olApp.CreateItem(0)
With olMsg
.To = toEmail
.CC = "myeamil.com"
.Subject = "On-boarding Process"
.HTMLBody = " Please review the attached form (those with existing... accounts will need to be updated..."
.Attachments.Add fileAttachment
.Send
End With
End Sub