Recent content by Dawn

Thank you Michael. The attachments will always be a PDF file.

Can anyone help me adjust this code so that it saves the email and the attachments as one PDF file. Sub SaveMessageAsPDF(Item As Outlook.MailItem) Dim Selection As Selection Dim obj As Object Dim Item As MailItem Dim wrdApp As Word.Application Dim wrdDoc As...