Set Print Area
 

I would like to use the property Print Area. This property
requires two give two cells for the array: top-left corner
and the bottom-right one. The top-left corner is constant
at $A$1. The bottom right has a constant column "K" but
its row varies.

Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$K$?"

How could I specify the value for the row in the PrintArea
property taking into account that this value is a number
shown in cell $L$1

Can anyone provide me with the code?

Thank you very much,

Marc

Set Print Area
 

Try this

LastRow = Range("$L$1").Value
Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$K$" & _
LastRow

Regards
Klaus

-----Original Message-----
I would like to use the property Print Area. This
property
requires two give two cells for the array: top-left
corner
and the bottom-right one. The top-left corner is constant
at $A$1. The bottom right has a constant column "K" but
its row varies.

Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$K$?"

How could I specify the value for the row in the
PrintArea
property taking into account that this value is a number
shown in cell $L$1

Can anyone provide me with the code?

Thank you very much,

Marc

.