i have in each record a pth into a pdf file, and i want to send several pdf files as an attachment in an e-mail, any on e knows how can i do that ?? thank you
That is a great and very helpfull code, thank you, but i don't know if you can help me with this issue, my case is:
i have a form and a subform, in the subform several records each one contains a pdf file path, when the user clicks on a button, i want the outlook send window to open and automatically attach all the pdf files in the records (may be a loop) and the user fills in the to : email and subject and body and send it , could that be done just the attachments and outlook send window pen ? Thanks
Code:
Dim OLApp As New Outlook.Application
Dim OLMsg As Outlook.MailItem
Set OLMsg = OLApp.CreateItem(olMailItem)
With OLMsg
.Recipients.Add "your_email_to_person@their_email_address"
.Subject = "What you want in the subject line"
.Attachments.Add Name_of_file_to_attach_if_you_need_to_attach_a_file
.Body "The_body_text_of_the_email"
.Send
End With
MsgBox "Emailing Complete", vbOKOnly + vbInformation, "Email Sent"
Set OLApp = Nothing
Set OLMsg = Nothing