Panes Property Example

This example displays the number of panes in the active window in Book1.xls.

Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
MsgBox "There are " & ActiveWindow.Panes.Count & _
    " panes in the active window"

This example activates the pane in the upper-left corner of the active window in Book1.xls.

Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.Panes(1).Activate