在每条消息中包含多个带有一个或多个附件的电子邮件，如何转发所有此类 attachments only （不是邮件，只是附件）？我正在寻找一个不需要太多时间的 simple 解决方案 .
在VBA中执行此操作非常简单 . 使用Explorer.Selection对象集合迭代其中的MailItem对象，并使用Attachment.SaveAsFile迭代每个MailItem的Attachments集合，暂时将每个文件保存到磁盘 . 然后，您可以创建一个新的MailItem对象并使用MailItem.Attachments.Add添加每个保存的文件，然后调用MailItem.Display来显示该电子邮件 .
1 回答
在VBA中执行此操作非常简单 . 使用Explorer.Selection对象集合迭代其中的MailItem对象，并使用Attachment.SaveAsFile迭代每个MailItem的Attachments集合，暂时将每个文件保存到磁盘 . 然后，您可以创建一个新的MailItem对象并使用MailItem.Attachments.Add添加每个保存的文件，然后调用MailItem.Display来显示该电子邮件 .