Simple task. Open new explorer and hide navigation pane.
Dim Expl1 As Outlook.Explorer:
Set Expl1 = Explorers.Add(folder, olFolderDisplayNoNavigation)
Outlok 2010 did it without problems, 2016 crashes Outlook. olFolderDisplayFolderOnly works without crashing Outlook.
So I tried ...
Dim Expl1 As Outlook.Explorer
Set Expl1 = Explorers.Add(folder)
Call Expl1.Search(filter, olSearchScopeCurrentFolder)
Call Expl1.Display
If Expl1.IsPaneVisible(olNavigationPane) Then
Expl1.ShowPane olNavigationPane, False
End If
... and when I tested it step by step, it all worked. But when I ran code without breaks, the navigation pane was still visible. I tried same thing with olFolderList, and it worked without problems.
I am confused. I am learning outlook dev for last 2 month. And I really don't know if I am missing something or this is total nonsense from Outlook 2016.
Please, give me something. Thanks in advance. George
Dim Expl1 As Outlook.Explorer:
Set Expl1 = Explorers.Add(folder, olFolderDisplayNoNavigation)
Outlok 2010 did it without problems, 2016 crashes Outlook. olFolderDisplayFolderOnly works without crashing Outlook.
So I tried ...
Dim Expl1 As Outlook.Explorer
Set Expl1 = Explorers.Add(folder)
Call Expl1.Search(filter, olSearchScopeCurrentFolder)
Call Expl1.Display
If Expl1.IsPaneVisible(olNavigationPane) Then
Expl1.ShowPane olNavigationPane, False
End If
... and when I tested it step by step, it all worked. But when I ran code without breaks, the navigation pane was still visible. I tried same thing with olFolderList, and it worked without problems.
I am confused. I am learning outlook dev for last 2 month. And I really don't know if I am missing something or this is total nonsense from Outlook 2016.
Please, give me something. Thanks in advance. George