Well seeing as how no one else has helped I'll take a stab at it. Mind
you that this is definately not your best option.

On error resume next
ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1

if err.number = 9 then
'Do what you want
err.clear
Else
err.raise
end if
on error goto 0

HTH

Die_Another_Day
s80NL wrote:
1 down, 1 more to go :)

Thanks for providing already one of the solutions!


--
s80NL


------------------------------------------------------------------------
s80NL's Profile: http://www.excelforum.com/member.php...o&userid=36374
View this thread: http://www.excelforum.com/showthread...hreadid=561587