IF statement in macro

[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,

 

[Tom Hutchins]

Try something like

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

Hope this helps,

Hutch

 

[Aline]

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

 

[Tom Hutchins]

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

 

[Aline]

Hi Tom,

It works! Thanks a lot. You're the best.

Aline