ActivePane Property
Returns a Pane object that represents the active pane in the document window. Read-only.
Example
If the active pane is the slide pane, this example makes the notes pane the active pane. The notes pane is the third member of the Panes collection.
With ActiveWindow
If .ActivePane.ViewType = ppViewSlide Then
.Panes(3).Activate
End If
End With