将过滤器应用于Outlook文件夹VBA

我正在过滤Outlook中的文件夹以限制主题和收到的时间。

如果我只对比另一天更大的一天感兴趣，则过滤器完美工作。 IE浏览器 -

datevalue = Format(Sheet1.Range("c" & reloop).Value - 1, "DDDDD HH:NN")

本地视图30/07/2017 - 在电子表格中值为30/07/2017 00:00:00

当我试图筛选比一天时间时它打破了和返回文件夹中的所有项目。

我设置下面

datevalue = Format(Sheet1.Range("L" & reloop).Value, "DDDDD HH:NN")

这将DATEVALUE在当地人窗口看起来像是31/07/2017 07:00:00。在电子表格中值为31/07/2017 07:00:00

我使用的完整的代码如下的过滤器

strFilter = "@SQL=" & Chr(34) & "urn:schemas:httpmail:subject" & Chr(34) & " = '" & FilterValue & "' And " & Chr(34) & _ 
     "urn:schemas:httpmail:datereceived" & Chr(34) & " > ' & " & datevalue & " & '"

这是简单地宣布DATEVALUE时，格式问题？

来源

2017-08-02 Rhys Williams

你可以试试像“DD/MM/YYYY” –

这样的其他格式吗？如果我将它从“ddddd hh：nn”更改为“dd/mm/yyyy”，我需要考虑时间才能删除时间戳 –

是的，它会从中删除时间戳。如果您对所有日期使用相同的格式以避免任何不匹配错误 –

> ' &是过滤器字符串的一部分。

来源

2017-08-02 13:25:58

是否需要&&&&&&&&&& –

最有可能&&&>“'”＆datevalue＆“'” –

谢谢你是对的，这项工作现在非常好！ –

将过滤器应用于Outlook文件夹VBA

回答

相关问题