UdRng.Formula = "=IF(AND(A100, H100),""EQ"","""")"

"Jim May" wrote:

Worksheets("Cost Analysis").Activate
Set UdRng = ActiveSheet.Range("F10:F38")
UdRng.Formula = "=IF(AND(A100, H100),"EQ","")" << occuring here
ActiveSheet.Range("A9:G38").Select
Selection.AutoFilter

Help appreciated