=if(and(....

  • Thread starter Thread starter Lift Off
  • Start date Start date
L

Lift Off

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

=IF(AND(J2=0,F2>0),"NO",IF(AND(J2=1,F2>0),"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
 
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:

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
 
Back
Top