Explorer.CurrentView Property (Outlook)
Returns or sets a Variant representing the current view. Read/write.
You must save a reference to the View object returned by CurrentView before you proceed to use it for any purpose.
Sub ResetView() Dim v as Outlook.View ' Save a reference to the current view object Set v = Application.ActiveExplorer.CurrentView ' Reset and then apply the current view v.Reset v.Apply End Sub
When this property is set, two events occur: BeforeViewSwitch occurs before the actual view change takes place and can be used to cancel the change and ViewSwitch takes place after the change is effective.
The following Visual Basic for Applications (VBA) example sets the current view in the active explorer to messages if the Inbox is displayed.