Outlook - 将邮件导出到vba规则的文本

Question

我很确定之前已经完成了这项工作。

有没有人知道如何将电子邮件导出到我的驱动器上的文本文件中，我知道如何将电子邮件移动到Outlook中的其他文件夹中，但是在我的驱动器上。

感谢。

Answer 1

查看MailItem.SaveAs方法。您可以指定路径和文件类型。

例如：

Sub SaveEmail()

Dim msg As Outlook.MailItem

  ' assume an email is selected
  Set msg = ActiveExplorer.Selection.Item(1)

  ' save as text
  msg.SaveAs "C:\MyEmail.txt", olTXT

End Sub

文件类型是OlSaveAsType常量。在VBA编辑器中按F2并将其粘贴到搜索框中以获取可能值列表。