我正在尝试在Outlook中运行规则,该规则将转发进入特定帐户的任何新邮件,该邮件将更改主题行并将邮件转发到其他帐户。
我已经设置了一条规则,在邮件到达后应用规则,该规则有附件,并且在此计算机上只运行Project1.ThisOutlookSession.SubjForward 除非邮件正文包含某些文字'
脚本看起来像这样
Sub SubjForward(Item As Outlook.MailItem)
Item.Subject = "New Subject"
Item.Save
Set myForward = Item.Forward
myForward.Recipients.Add "forwardmail@domain.com"
myForward.DeleteAfterSubmit = True
myForward.Send
End Sub
该规则将邮件转发到新地址,但它会继续转发相同的电子邮件,直到我杀死该脚本。
任何人都知道我哪里出错了?
我在下面的评论中更新了更多详情,谢谢
答案 0 :(得分:0)
尝试使用ItemAdd事件处理程序,这样您的脚本只会在新的“项目”添加到您的收件箱时运行,即。当你收到邮件时。
或者,我真的不能在这里看到需要使用VBA吗?你可以设置一个关于outlook的规则来转发消息吗?
此致 保罗