当我收到包含特定主题的电子邮件时,我会运行一个脚本。 在脚本的最后,我想将MailItem标记为完成,并使其显示电子邮件旁边的复选标记。
我打电话给 MarkAsTask olMarkComplete 做了它应该做的事情,但用户界面没有更新,并且除非我通过以下方式选择/取消选择电子邮件,否则复选标记不会出现用户界面
编辑:当我遍历我的文件夹中的所有电子邮件时,它只适用于最后一组。我在这里错过了什么......?
到目前为止我的代码:
Dim reviewFolder As Folder
Dim item As Outlook.MailItem
Set myFolder = ThisOutlookSession.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("My Folder")
For Each item In myFolder.Items
{other code}
item.MarkAsTask olMarkComplete
Next
答案 0 :(得分:1)
您需要致电MailIten.Save
。