Last Row not working in vlookup

[johnnyb5]

I'm using a common "Last Row" formula in a VBA macro and it is not working in a "Vlookup" formula even though it works in a "Range Formula".

The lastrow formula is:
Dim LstRw As Long
LstRw = Range("A:CB").Find(What:="*", SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row

This works in the "Range Formula":
Range("H2").AutoFill Range("H2:H" & LstRw)

It does not work in the "Vlookup Formula"
Range("I2").Formula = "=""Company_""&VLOOKUP(E2,$G$2:$H&LstRw,2,0)"

If I remove the "LstRw" and replace it with a real row number the formula will work however, I need it to be dynamic as the quantity of row numbers will change daily.
Would anyone know how to correct this??
Thank You,
JB

 

[starl]

LstRow is a VBA variable, so you need to put it outside the formula you're trying to put in the cell.
"=""Company_""&VLOOKUP(E2,$G$2:$H" & LstRw & ",2,0)"

 

[johnnyb5]

Yes Indeed Starl!!!

It has worked like a charm and I'm continuing my Macro building.
Thanks for your time, patience, and have a Happy New Year!!!
JB