![]() |
#4
|
|||
|
|||
![]()
Maybe something like this?
Sub UnifiedInbox() Dim myOlApp As New Outlook.Application Z = Date - 30 txtSearch = "received:>=" & Z myOlApp.ActiveExplorer.Search txtSearch, olSearchScopeAllFolders Set myOlApp = Nothing End Sub |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Outlook 2010 Not syncing past two weeks out | jacijarman | Outlook | 0 | 01-25-2016 10:43 AM |
Outlook search query: e-mails sent to domains other than a specified set | elliotshelton | Outlook | 0 | 11-21-2015 01:53 PM |
![]() |
algebrapro18 | Misc | 1 | 06-18-2014 04:10 PM |
![]() |
Rabski | Word | 1 | 11-13-2012 02:25 PM |
![]() |
jvieille | Misc | 1 | 02-11-2006 06:26 AM |