Sub ClearPBs()
'
' Suppress all pagebreaks
With ActiveSheet
Do While .HPageBreaks.Count 0
.HPageBreaks(1).Delete
Loop
Do While .VPageBreaks.Count 0
.VPageBreaks(1).Delete
Loop
End With

End Sub

HTH
--
AP


"Lisa" a écrit dans le message de
...
I am having page breaks occur leaving me with half a page of content and
some
pages with full content. I am unable to force a manual page break to bring
the content of the 2nd page back up to the 1st page. I thing this is
occuring
because the column content is long so the content will break from the
previous row and go to the next page instead of the content filling out
the
1st page then continuing on to the next page. How can I remove the page
breaks to allow all pages to have full content? I am totally unable to do
anything with the page break features to fix this problem. any assistance
will be appreciated.