OnAfterSubViewChange Event

Occurs after the Web window subview changes.

Private Subexpression_OnAfterSubViewChange()

expression     A variable name which references an object of type WebWindowEx declared using the WithEvents keyword in a class module.

Example

The following example displays a message to the user whenever the subview of the active Web site window changes or after the subview closes.

Private Sub objWebWindow_OnAfterSubViewChange()
 'Display a message indicating which view the subwindow is currently in

    Select Case objwebWindow.SubViewMode
        Case fpWebSubViewFolders
            MsgBox "The view in the subwindow has changed to Folder View."
        Case fpWebSubViewNavigation
            MsgBox "The view in the subwindow has changed to Navigation View."
        Case fpWebSubViewNone
            MsgBox "The sub window has closed."
    End Select

End Sub