IF statement in macro

  • Thread starter Thread starter Aline
  • Start date Start date
A

Aline

This is the formual:
=IF(AND(L3="Y", M3="Y", N3="Y"), "Y", "N")

I am having a hard time to add it in my existing macro.


********
FYI, I have an OR formula in my macron that works very well:
=IF(OR(E3="B", E3="C", E3="E"), "Y", "N")

In the macro:
..Range("L3:L" & LastRow).Formula _
= "=IF(E3=""B"", ""Y"", IF(OR(E3=""C""," _
& "E3=""E""), ""Y"", ""N""))"

Any suggestion?

Thanks,
 
Try something like

ActiveCell.Formula = "=IF(AND(L3=""Y"", M3=""Y"", N3=""Y""), ""Y"", ""N"")"

Hope this helps,

Hutch
 
Hi Tom,

Do you know can I modify it so it will automatically run the formula for the
rest of rows in the macro? Similar to another formula I've already had:
..Range("L3:L" & LastRow).Formula _
= "=IF(E3=""B"", ""Y"", IF(OR(E3=""C""," _
& "E3=""E""), ""Y"", ""N""))"

Thanks,
Aline
 
To do that, it's better to use R1C1-type cell addresses in the formulas added
to your worksheet from your macro. Assuming you have assigned a value to
LastRow, as in your other example, and that you want to enter the formulas in
column E (starting in row 3), try this:

With ActiveSheet
..Range("E3:E" & LastRow).Formula _
= "=IF(AND(RC12=""Y"", RC13=""Y"", RC14=""Y""), ""Y"", ""N"")"
End With

Hope this helps,

Hutch
 
Back
Top