vba - 无法在 MailItem 上设置属性

Question

我已经设置了一个规则来运行yuno以“Test1”为主题的任何东西（我在设置后重新启动）：

我的代码如下所示：

Sub yuno(ByRef mymail As MailItem)
    mymail.MarkAsTask olMarkToday
    mymail.TaskDueDate = Now
    mymail.ReminderSet = True
    Debug.Print "Y U NO?"
End Sub

“YU NO”在收到以“Test1”为主题的电子邮件时打印，但在 Outlook 中没有收到小红旗。Degustaf说此代码将在此处正确标记该项目：https ://stackoverflow.com/q/26722857/2642059但似乎问题在于将其作为规则运行。

Answer 1

我建议有一个失踪

mymail.Save