ActivePane Property
Returns a Pane object that represents the active pane in the window. Read-only.
Remarks
This property can be used only on worksheets and macro sheets.
This property returns a Pane object. You must use the Index property to obtain the index of the active pane.
Example
This example activates the next pane of the active window in Book1.xls. You cannot activate the next pane if the panes are frozen. The example must be run from a workbook other than Book1.xls. Before running the example, make sure that Book1.xls has either two or four panes in the active worksheet.
Workbooks("BOOK1.XLS").Activate
If not ActiveWindow.FreezePanes Then
With ActiveWindow
i = .ActivePane.Index
If i = .Panes.Count Then
.Panes(1).Activate
Else
.Panes(i+1).Activate
End If
End With
End If