Returns or sets the location of the horizontal window split, in points. Read/write Double.
This example sets the horizontal split for the active window to 216 points (3 inches).
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitHorizontal = 216