Moving Horizontal PageBreak

[CptGreenwood]

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]

Try this:

[VBA]
ActiveSheet.HPageBreaks.Add Before:=ActiveSheet.Range("a67")
[/VBA]

[CptGreenwood]

Thanks, but will I have two pagebreaks after that, one on A70 and one on A67 ?