I have a worksheet that a user enters data starting at "A7". For each
input row he fills columns "A" thru "G". He then presses a
commandbutton to calculate columns "I" thru "N" for each entry.

I clear the area A7:BB500, knowing there won't be more than 150 rows
at any one time. Now I'm planning to provide a commandbutton to print
the keyed-in data and calculated results. If the user only enters say
15 rows of data, does the calculation and goes to print. It prints
many blank pages after the data. I'm assuming the print settings say
to print thru range BB500 or at least BBxx. (xx=last row)

How do I get only the entire range of data entered/calced (a7:n22) to
be printed? Please show in code.

Starting range is "A7". Ending row is retrieved using "xlup". I know
last column to be printed is "N".

Dim StartRange as Range
Dim LastRow as Long
Dim LastCol as String

LastCol = "N"
Set StartRange = Range("A7")
LastRow = ActiveSheet.Cells(65535, 3).End(xlUp).Row

Now, how do I assemble all this information and place into the print
area range?????


tt