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.

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.

From a private reply:

I like to
select the range
then use Data|Filter|Autofilter

Then filter so that non-blanks are showing and print that.

I find it easier than either changing the printarea or selecting a range and
just printing that.


Dennis wrote:

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.

--

Dave Peterson