I asked this question earlier today, but may have scared people off
with how I worded the question. So, is there anyway to set the
vertical page break ranges after the print area has been established?

I would like set the page break at n51, n91, n131, etc.


Sub SetPrtAr_mysheet()
Dim lLastRow As Long
lLastRow = Range("I65536:K65536").End(xlUp).Row
Orientation = xlLandscape
ActiveSheet.PageSetup.PrintArea = Range("a6:N" & lLastRow).Address
End Sub


Thanx