PDA

View Full Version : Moving Horizontal PageBreak



CptGreenwood
10-06-2005, 01:38 AM
I try to move the location of a horizontal pagebreak (HPageBreak) to a new location by following statement:

Worksheets("Dokument").HPageBreaks(1).Location = Worksheet("Dokument").Range("A67")

This first pagebreak on the sheet is located at Range("A70") and should be moved three rows up to Range("A67") by that statement.

It does not work as expected. The effect: The value (!) of A67 is copied to A70, so both cells have the same text. The pagebreak is not affected.

What's wrong with the statement I use? It's quite the same as the one found in online help when searching for "location".

lucas
10-06-2005, 08:10 AM
Try this:


ActiveSheet.HPageBreaks.Add Before:=ActiveSheet.Range("a67")

CptGreenwood
10-06-2005, 11:53 PM
Thanks, but will I have two pagebreaks after that, one on A70 and one on A67 ?