Vlookup not working as expected.

[tourless]

Hi Folks.

If I enter my vlookup... =VLOOKUP(O7,BudgetHours,2,FALSE)*U1 directly into a cell it works as expected. When I try to pass this... Range("D" & i).Formula = "=VLOOKUP(O & i & ,BudgetHours,2,False)*U1" I get thrown out of my routine. Here's the full snippet...

lRow = Range("A" & Rows.Count).End(xlUp).Row
    For i = 3 To lRow
        With Range("O" & i)
            If .Font.Bold Then
                Range("D" & i).Formula = "=VLOOKUP(O & i & ,BudgetHours,2,False)*U1"
            End If
        End With
    Next

 

[Joe4]

In VBA code, it is important to understand that everything between double-quotes will be treated as literal text.
So any variables you have must be outside of the double-quotes to be treated as a variable, i.e.

Range("D" & i).Formula = "=VLOOKUP(O" & i & ",BudgetHours,2,False)*U1"

 

[tourless]

In VBA code, it is important to understand that everything between double-quotes will be treated as literal text. So any variables you have must be outside of the double quotes, i.e.

Range("D" & i).Formula = "=VLOOKUP(O" & i & ",BudgetHours,2,False)*U1"

I should have known better. Quotes give me headaches. -Thanks Joe.

 

[Joe4]

You are welcome.
Glad I was able to help!