I have this formula in a spread sheet that works fine:

=IF(AND(J2=0,F20),"NO",IF(AND(J2=1,F20),"YES",'' ))

I'm trying to put it into a macro but it won't compile. I've written
the macro thus:

With Range ("H2")
Range(.Cells(0, 1), .End(xlDown)).Offset(0, 3).FormulaR1C1 = _
"=IF(AND(RC[-1]=0,RC[-5]0),"NO",IF(AND(RC[-1]=1,RC[-5]0),"YES",""))"
End With

What have I done wrong?

Thanks


--
Lift Off
------------------------------------------------------------------------
Lift Off's Profile: http://www.excelforum.com/member.php...fo&userid=8249
View this thread: http://www.excelforum.com/showthread...hreadid=482087

try this - seemed to work for me - note you need double "" everwhere

Sub macro1()
With Range("H2")
Range(.Cells(0, 1), .End(xlDown)).Offset(0, 3). _
FormulaR1C1 =
"=IF(AND(RC[-1]=0,RC[-5]0),""NO"",IF(AND(RC[-1]=1,RC[-5]0),""YES"",""""))"
End With
End Sub


--
duane


------------------------------------------------------------------------
duane's Profile: http://www.excelforum.com/member.php...o&userid=11624
View this thread: http://www.excelforum.com/showthread...hreadid=482087

Duane:

That's it! I NEVER would have found that solution. What's the rule on
this double quote thing?

Many thanks for taking the time.

Cliff


--
Lift Off
------------------------------------------------------------------------
Lift Off's Profile: http://www.excelforum.com/member.php...fo&userid=8249
View this thread: http://www.excelforum.com/showthread...hreadid=482087