Creating new explorer windows

  • Thread starter Thread starter Patrick McKinley
  • Start date Start date
P

Patrick McKinley

In VBA I want to create new explorers and activate their windows for the
Calendar and Contact folders in Outlook 2003.

(A) Interactively I can right click a button at the bottom of the Navigation
Pane and select "Open in New Window."

(B) From VBA, I can select the Calendar folder, get a new explorer, and
activate its window:
Set objNameSpace = objApplication.GetNamespace("MAPI")
Set mycalfolder = objNameSpace.GetDefaultFolder(olFolderCalendar)
Set expCalendar = mycalfolder.GetExplorer
expCalendar.Activate

Using (A) the explorer's class property is set to "olExplorer"
Using (B) the explroer's class property is set to "olView"

I believe it is this class difference that determines the icon used in the
Windows Task Bar.
However, the class property is read-only, and I do not know how to
programmaticlly emulate the interactive method.

Any ideas on how to set the icon in the Windows Task Bar for Outlook
Explorer objects?

Thanks,
Patrick
 
Hi Patrick,

is it possible that you check the wrong properties? For me the
Explorer.Class property is always olExplorer.
 
Back
Top