Range("F3").Select
ActiveCell.FormulaR1C1 = _
"=IF(R[-1]C1-(VLOOKUP(R[-1]C1,'LII 200 raw " & Chr(10) &
"data'!R[-1]C1:R65000C4,1))<1,IF(ISERROR(VLOOKUP(R[-1]C1,'LII 200 raw " &
Chr(10) & "data'!R[-1]C1:R65000C4,4)),NA(),VLOOKUP(R[-1]C1,'LII 200 raw " &
Chr(10) & "data'!R[-1]C1:R65000C4,4)),NA())"


"Faz" wrote:

I have the following statement on an excel spreadsheet. Please help me to
convert this to either a macro or vba code, the latter preferably.

=IF($A2-(VLOOKUP($A2,'LII 200 raw
data'!$A2:$D$65000,1))<1,IF(ISERROR(VLOOKUP($A2,'L II 200 raw
data'!$A2:$D$65000,4)),NA(),VLOOKUP($A2,'LII 200 raw
data'!$A2:$D$65000,4)),NA())

Thanks
Faz