我正在使用MS OFFICE 2010，并且必须每天将大约100个Pdf转发给同一个接收者，但在单独的电子邮件中。 这意味着我扫描约100页作为pdf（不管什么是pdf的名称），并且必须发送约100封电子邮件（每封电子邮件的电子邮件）到同一个接收器。将文件夹中的所有Pdf转发给同一个接收者，但是在单独的电子邮件中（OUTLOOK VBA）
Pdfs的名称是不一样的，我不想重命名它们Manuelly，所以我必须在一个文件夹内循环，然后将每个PDF文件转发到相同的Receiver，并通过Outlook将其转发给同一主题。
任何想法，在哪里以及如何开始。 简单地说，如何使用附件转发电子邮件，这部分代码应该在循环内。
由于提前
将附件添加到您需使用附件类的Add方法邮件项目对象。
Sub AddAttachment()
Dim myItem As Outlook.MailItem
Dim myAttachments As Outlook.Attachments
Set myItem = Application.CreateItem(olMailItem)
Set myAttachments = myItem.Attachments
myAttachments.Add "C:\Test.doc", _
olByValue, 1, "Test"
myItem.Display
End Sub
要提交您需要使用的MailItem类的Send方法邮件项目。
了解更多关于How to create and show a new Outlook mail item programmatically: C#, VB.NET和How To: Create and send an Outlook message programmatically的文章。
你可以找到的代码可以通过导航到以下链接获取文件名的文件夹中：
而且你会发现Getting Started with VBA in Outlook 2010文章很有帮助。