Wandering Split

[Otto Moehrbach]

Excel XP & Win XP
I want to split the active window at row 1022. I recorded the following
macro as I did it. Now, when I run that macro, I see no split at row 1022.
I then run the second macro and it says the split is at a variable row,
sometimes 27, other times 31, then 32, etc. The second macro changes it's
split row after every time I run the first macro. I go to the row given by
the second macro and there is no split there. There are no double scroll
bars on the screen. I click on Windows and it shows "Remove Split" implying
that there is a split.
I even bracketed the code in the first macro with EnableEvents code because
I have a number of event macros in the file. Nothing helps.
How can I make this work? Thanks for your time. Otto

Sub SplitWindow()
With ActiveWindow
.SplitColumn = 0
.SplitRow = 1022
End With
End Sub

Sub FindSplit()
MsgBox ActiveWindow.SplitRow
End Sub

 

[Doug Glancy]

Otto,

I never use split (I prefer Freeze Panes) but here's what it looks like to
me. The SplitRow specified can be no higher than the number of rows visible
on your screen. In other words if your screen shows 30 rows, SplitRow
should not be any higher than that. I think that's why it's a function of
the Window, not the Sheet.

With the macro recorder on, I scrolled down to row 100 and split the screen.
When I ran your SplitFind it returned "18", which makes sense because row
100 was 18 down from the top of the screen.

hth,

Doug

 

[Tom Ogilvy]

It is relative to the top row in the window


Sub SplitWindow()
With ActiveWindow
.ScrollRow = 1013
.SplitRow = 10
End With
End Sub

 

[Otto Moehrbach]

Doug, JL, Tom
Thanks to you all. You gave me an education today. I would never have
figured that one out. Otto