I wont supply example code on this one just yet.

I'm thinking you could catch the Workbook_BeforePrint event and check for
blank content on the second page.
Then set ActiveSheet.PageSetup.PrintArea to the desired range.



"Dennis" wrote in message
...
I have some worksheets that have several rows of possible
information. Some of these need 2 pages to show all of the
rows. Many times though, maybe only 1 or 2 rowws will need
to be filled out. I then printout almost 2 pages of blank
lines. Is there a way that I can tell it to only print 1
page if the last piece of information is on the first
sheet. That way I won't print a sheet full of blank lines.