Creating new explorer windows

[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

 

[Michael Bauer]

Hi Patrick,

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