Setting up a variable print range
 

I am looking for an easy way to use a macro to select a
print range by determining the last row and column used.
However, the last row and column used will change between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary

Setting up a variable print range
 

Hi Gary

Did you not see your other thread
You get a couple possible solutions there

(Posted private also)

--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Gary" wrote in message ...
I am looking for an easy way to use a macro to select a
print range by determining the last row and column used.
However, the last row and column used will change between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary

Setting up a variable print range
 

What exactly do you mean when you say 'last row and column
used'?

A quick and dirty way is:
Range("A1:" & Range("A1").CurrentRegion.SpecialCells
(xlCellTypeLastCell).Address).PrintOut

This uses A1 to find the set of contiguous values that
make up the table of data and then prints A1 through the
cell that is in the last row and last column.

tod
-----Original Message-----
I am looking for an easy way to use a macro to select a
print range by determining the last row and column used.
However, the last row and column used will change
between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary

.

Setting up a variable print range
 

One more possible method:

ActiveSheet.PageSetup.PrintArea = _
ActiveSheet.UsedRange.Address

Provided you save your workbook before running this code,
this would grab the smallest rectangular area of cells
that contain any data.

-----Original Message-----
I am looking for an easy way to use a macro to select a
print range by determining the last row and column used.
However, the last row and column used will change
between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary

.

Setting up a variable print range
 

For example, if I enter data in a spreadsheet where I am
only using the range from A1 to L98, I want to be able to
select that range and print it. Maybe next time I use the
spreadsheet I only use the Range A1 to L16, I would like
to print only that range.

Gary

-----Original Message-----
What exactly do you mean when you say 'last row and
column
used'?

A quick and dirty way is:
Range("A1:" & Range("A1").CurrentRegion.SpecialCells
(xlCellTypeLastCell).Address).PrintOut

This uses A1 to find the set of contiguous values that
make up the table of data and then prints A1 through the
cell that is in the last row and last column.

tod
-----Original Message-----
I am looking for an easy way to use a macro to select a
print range by determining the last row and column
used.
However, the last row and column used will change
between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary

.

.

Setting up a variable print range
 

ActiveSheet.PageSetup.PrintArea = _
Range("A1").CurrentRegion.Address(external:=true)

Put it in the BeforePrint event.

Regards,
Tom Ogilvy

Gary wrote in message
...
I am looking for an easy way to use a macro to select a
print range by determining the last row and column used.
However, the last row and column used will change between
users. For example, if the user only used up to row 98
and
column L is the last column used. I need to select the
range A1 to L98 and print this range. Thanks for any
input.

gary