Outlook代码停止工作

问题描述:

我对所有电子邮件都有1分钟的延迟,并且想要分配设置为规则的例外以立即发送。Outlook代码停止工作

我创建了宏,但它停止工作。

Public Sub CategoriesButton() 
    Dim Item As Outlook.MailItem 
    Set Item = Application.ActiveInspector.CurrentItem 
    Item.Categories = "SendMe" 
    Item.Save 
End Sub 

有趣 - 我只是有同样的问题。完美的工作,但后来我重新启动Outlook,它停止工作 - 没有明显的原因。

花了我一段时间来解决这个问题 - 但是当您重新启动Outlook时,它会将宏安全权限应用于您的宏。

如果您还没有对您的宏进行数字签名,默认行为是阻止它运行。

你可以放松的安全设置,以便Outlook与任一问你运行宏,或只是运行所有宏考虑权限(这后一种选择可能不是一个好主意!)

您可以自签名自己的宏,有相当不错的指南,这样做,在这里:http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

但烦人看来你将总是得到通知,甚至有签名的宏...所以它可能更容易只是改变安全设置'全部通知'。

希望这会有所帮助 - 你发布的代码当然帮助我,它是正好是我正在寻找,也控制1分钟的延迟!

男人,每当我走近Outlook中的宏我最终失去半天左右......