View Single Post
  #1  
Old October 24th 06, 08:03 AM posted to microsoft.public.outlook.program_vba
Luke242
external usenet poster
 
Posts: 3
Default Changing View to "Search Folder" Upon Start Up

Hey,
I want outlook to start up my Search Folder named "For Follow Up" showing up
as the default view.

I am truly a beginner and am trying to hack this together. The code below
will switch the view to "standard" folders underneath the Inbox, but not to a
Search Folder. Does any one have any ideas on how to change my view to a
Search Folder named "For Follow Up"?

Thanks for any help, Luke

Dim myolApp As Outlook.Application
Dim myNamespace As Outlook.NameSpace
Set myolApp = CreateObject("Outlook.Application")
Set myNamespace = myolApp.GetNamespace("MAPI")
Set myFolder = _
myNamespace.GetDefaultFolder(olFolderInbox)
Set myolApp.ActiveExplorer.CurrentFolder = _
myFolder.Folders("For Follow Up")
Ads