This example splits the active window in Book1.xls at cell B2, without freezing panes. This causes the Split property to return True.
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
With ActiveWindow
.SplitColumn = 2
.SplitRow = 2
End With
This example illustrates two ways of removing the split added by the preceding example.
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.Split = False 'method one
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitColumn = 0 'method two
ActiveWindow.SplitRow = 0
This example removes the window split. Before you can remove the split, you must set FreezePanes to False to remove frozen panes.
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
With ActiveWindow
.FreezePanes = False
.Split = False
End With