IF function

[Bob Phillips]

With Range("C2")

    .FormulaR1C1 = "=VLOOKUP(RC[2],'DATA!C[-1]:C[30],32,)"
    If Application.CountA(Rows(3).Cells) > 0 Then
    
        lnglastrow = ActiveSheet.UsedRange.Rows.Count
        .AutoFill Destination:=.Resize(lnglastrow)
    End If
End With