2017-08-02 80 views
0

我正在爲我的一段代碼苦苦掙扎。將過濾器應用於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時,格式問題?

+0

你可以試試像「DD/MM/YYYY」 –

+0

這樣的其他格式嗎?如果我將它從「ddddd hh:nn」更改爲「dd/mm/yyyy」,我需要考慮時間才能刪除時間戳 –

+0

是的,它會從中刪除時間戳。如果您對所有日期使用相同的格式以避免任何不匹配錯誤 –

回答

0

> ' &是過濾器字符串的一部分。

+0

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

+0

最有可能&&&>「'」&datevalue&「'」 –

+0

謝謝你是對的,這項工作現在非常好! –

相關問題