Q:

Conditional Formatting Error VBA

I was wondering whether someone can help please?! Im getting an error at the following line:
.Add Type:=xlExpression, Formula1:= _
    "=IF($E1<>"",AND($E1<TODAY(),$F1=""Awaiting Information"")) = 1"

Here is the code below.
Sub ConditionalFormat()

Sheets("NACO").Cells.FormatConditions.Delete

 With Worksheets("NACO").Columns("A:N").FormatConditions
**.Add Type:=xlExpression, Formula1:= _
    "=IF($E1<>"",AND($E1<TODAY(),$F1=""Awaiting Information"")) = 1"**
With .Item(.Count).Interior
    .Color = 255
End With

.Add Type:=xlExpression, Formula1:= _
    "=IF($E1<>"",AND($E1<TODAY(),$F1=""On Going"")) = 2"
With .Item(.Count).Interior
    .Color = 225
End With

.Add Type:=xlExpression, Formula1:= _
    "=IF($E1<>"",AND($E1<TODAY(),$F1=""Awaiting Quotation"")) = 3"
With .Item(.Count).Interior
    .Color = 255
End With

.Add Type:=xlExpression, Formula1:= _
    "=$F1=""On Going"" = 4"
With .Item(.Count).Interior
    .Color = RGB(247, 150, 70)
End With
End With
End Sub

Could someone please explain why the error is occurring please? Is it to do with the ""? 

A:

Can you try changing the formula to this one:
=IF(AND($E1<>"",$E1<TODAY(),$F1="Awaiting Information")=1?

