转发来自Microsoft Outlook中多封邮件的附件

Question

每封邮件中都有多封带有一个或多个附件的电子邮件，我该如何转发所有此类仅附件（不是邮件，而只是附件）？我正在寻找一种不会花费太多时间的简单解决方案。

Answer 1

在VBA中执行此操作非常简单。使用Explorer.Selection对象集合来遍历其中的MailItem对象，并遍历每个MailItem的Attachments集合，并使用Attachment.SaveAsFile将每个文件临时保存到磁盘。然后，您可以创建一个新的MailItem对象，并使用MailItem.Attachments.Add添加每个保存的文件，然后调用MailItem.Display以显示电子邮件。