使用VBA将附件另存为其他文件类型

我试图编写一个宏将html附件保存为.txt文件（然后对.txt文件执行一些操作），但一开始就遇到了一个问题-附件对象只有SaveAsFile方法，没有SaveAs方法，SaveAsFile方法只有path参数，没有type参数

我尝试过各种方法，只是偷偷地将.txt插入路径名，但都没有成功

---

这是我第一次尝试“认真”编程，所以我可能遗漏了一些非常明显的东西。

您只需要为文件指定所需的扩展名。Attachment类的方法将附件保存到指定的路径（使用指定的文件名）

---

你也会发现这篇文章很有帮助

我将首先执行

SaveAsFile

方法。然后执行一些代码，将文件转换为

.txt

文件。让代码杀死上一个文件，因为当您保存为旧副本时，旧副本仍将存在。然后，您可以自由地使用

.txt

执行您想要的操作。当我尝试这样做时，我收到了运行时错误“-2147024809（80070057）”，或者什么也没发生。下面是我尝试的一个例子。这一条导致了错误消息：

Sub SaveAsText（）

Dim myItem As Outlook.MailItem

Dim myAttachment As Attachment

Set myItem=Application.ActiveInspector.CurrentItem

Set myAttachment=myItem.Attachments（1）

myAttachment.SaveAsFile“C:\Users\C63925\Documents”&myItem.Subject&“.txt”`End Subject确保Subject字段不包含禁止的符号。尝试先指定任何简单名称，然后查看其是否有效。例如：“D:\hello.txt”