我正在创建一个宏,该宏将电子邮件附件拉入一个文件夹中以进行打开和复制,当预定义主题名称(即永不更改)时,它可以100%完美地工作。
' this works
Set oOlInbFiltered = oOlInb.Items.Restrict("[Subject] = " & SubjectName)
但是,当我尝试限制预设的开头时,例如,每封电子邮件都以“ aaaaa”开头,则会导致自动错误,并显示以下代码:
' this doesnt
Set oOlInbFiltered = oOlInb.Items.Restrict("[Subject] like '" & PrefixName & "%'")
有什么帮助吗?
预期结果:没有错误消息,文件夹中的文件。相反,我收到
运行时错误'-2147352567(800200009)':发生自动化错误异常。
尝试改用以下代码:
criteria = "@SQL=" & Chr(34) & "urn:schemas:httpmail:subject" & Chr(34) & " like '" & PrefixName & "%'"
Set oOlInbFiltered = oOlInb.Items.Restrict(criteria)
谢谢!我对SQL不是很熟悉。抱歉,很痛苦,但是如果我也想按系统的当前日期进行过滤,以便只接收今天的电子邮件,我将如何去做/学习去做呢?
请参阅docs.microsoft.com/zh-cn/office/vba/outlook/how-to/…