我在Outlook中创建了一条规则,可以自动将传入的邮件移动到文件夹并运行脚本来修改主题。
这是规则:
这是我的剧本:
Public Sub RemoveIrDateTime(Item As Outlook.MailItem)
'Item As Outlook.MailItem
'stringToMatch = "issued at 11/14/17 6:28 PM"
Set issuedMsg = New RegExp
Set priSev = New RegExp
Set iR = New RegExp
With issuedMsg
.Pattern = "issued at \d{1,2}/\d{1,2}/\d\d .+"
.Global = True
End With
With priSev
'.Pattern = "^P\d/S\d - IR"
.Pattern = "^.+IR"
.Global = True
End With
Item.Subject = issuedMsg.Replace(Item.Subject, "")
Item.Subject = priSev.Replace(Item.Subject, "IR")
'Item.Subject = Left(EmItemail.Subject, 60)
Item.Save
End Sub
当匹配的消息到达时,它会被移动到指定的文件夹,但主题不会更新。
但是,如果我使用'管理规则&警报选项,并针对目标文件夹“事件”运行我的规则,然后文件夹中的电子邮件主题按照我的预期更新。
Outlook中是否存在错误,移动邮件会阻止脚本运行?关于如何解决的任何想法?