Excel 用.SaveAs以.msg格式保存电子邮件草稿

我正在使用VBA代码在Outlook中使用PowerPoint文件中的信息编写电子邮件，并将其保存为草稿，格式为“.msg”

我有两个问题：

1）当我使用以下命令保存文件时：

.SaveAs "C:..." & numb_slide & ".msg", 5

程序没有给我错误，但我无法打开保存的草稿，错误状态为：

如果我创建一封普通电子邮件并将其保存为草稿，我可以稍后打开它

2）如果更改保存文件的方式，如：

.SaveAs "C:... " & CStr(date_c) & " | ... " & CStr(name_project) & ".msg", 5 

或

在完成任务之前，它会给我以下错误：

---

我在名称中写入的变量是字符串，但我也尝试使用

CStr（）

来编写它们，以检查它是否会产生任何影响，但事实并非如此

我想你想要

3

而不是

5

从枚举中：

• 3

  对应于Outlook邮件格式（.msg）

• 5

  对应于HTML格式（.HTML）

或者，您也可以删除文件类型。根据文件

如果未指定文件类型，则使用MSG格式（.MSG）

---

谢谢你，这适用于问题编号（1）！：）现在我想解决第（2）个问题，你对此有什么想法吗？我认为文件名不能包含

|

字符。很好，很容易解决，很乐意帮助！

.SaveAs "C:... " & CStr(date_c) & " | ... " & CStr(name_project) & ".msg", 5 

.SaveAs "C:... " & date_c & " | Open Tasks " & name_project & ".msg", 5