Horizontal Page Breaks Problem

[Bodz38]

I have a spreadsheet that I need to print as a two page document but the first page will consist of a variable number of rows (others being hidden).

I want the page break to occur at a specific row reference (257) but I'm having problems with the code - it either seems to ignore the command and puts the page break where it want to or returns an error code.
Sometimes I think I have it working only to close, re-open and find that I still have an error.

Code is as follows:

Please Login or Register  to view this content.

Thanks

[Bodz38]

I'd really appreciate any thoughts on this as it's now starting to drive me crazy!!

I've tried all sorts of combinations of using
ActiveSheet.HPageBreaks.Add before:=ActiveSheet.Cells(257, 1)
Set ActiveSheet.HPageBreaks(1).Location = Cells(257, 1)
Including using Range.cells(A257) and/or using row descriptor etc,
forcing breaks to manual using xlPageBreakManual
etc etc

but nothing seems to do the trick.

It is easy to do manually - set to print 1 page wide by 2 page tall then in page break preview slide the assigned page break to where I want it - why is it so complicated to do it in code?

Thanks