proper syntax in code needed

[Jim May]

I need to use something like this in my code:
Activesheet.PageSetup.PrintArea = "$A$1:$C$5"

but I need to substitute the address range above to or as follows:

Where I already have a variable "Lrow" = 7122

I wish to print the area:

A7082 (<< this # set to Lrow minus 40) : H7122

I can't get syntax to work - I've tried:

PrtRng = Range("A & LRow - 45 & ":I" & LRow) << Not being accepted

Tks in Advance for helping,,

 

[Gary Brown]

Looks like you may be missing a quotation mark. Try...
PrtRng = Range("A" & LRow - 45 & ":I" & LRow)
'not tested.
HTH,
Gary Brown

 

[Tom Ogilvy]

PrintArea is looking for a string.

You are missing a double quote in your concatenation. should be:

? "A" & LRow - 45 & ":I" & LRow
A7077:I7122


then
Dim prtRng as String

prtRng = Range( "A" & LRow - 45 & ":I" & LRow).Address(external:=True)

Activesheet.PageSetup.PrintArea = prtRng

Change 45 to 40 if you actually want 7082