View Single Post
  #4  
Old October 25th 06, 07:14 AM posted to microsoft.public.outlook.program_vba
Michael Bauer [MVP - Outlook]
external usenet poster
 
Posts: 1,885
Default Changing View to "Search Folder" Upon Start Up

Am Mon, 23 Oct 2006 23:03:02 -0700 schrieb Luke242:

Why donīt you simply use the options dialog and chose the folder you want to
start with?

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

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