没有“保存更改”对话框的Outlook VBA草稿电子邮件

问题描述

我使用VBA创建新的MailItem元素并将其移动到我的收件箱中。 由于未发送它们,因此从Outlook的角度将其作为草稿处理。 这意味着,当我打开这样的元素时,如果没有烦人的保存提示,就无法关闭它。

Do you want to save/discard prompt in German (sorry)

是否可以使用未发送的邮件元素来跟踪情况? 我也可以将这些元素发送到我自己的邮件地址,但这有时会花点时间才能收到。因此,我宁愿只在本地创建它们。

解决方法

使用for keys in dict: count=0 outSheet.write(2,count+1,keys) print(count) count = count +1 ,您可以指定olDiscard,olPromptForSave或olSave。

https://docs.microsoft.com/en-us/office/vba/api/outlook.mailitem.close(method)

.Close