For-Next Loop Help

[YellowLabPro]

Not my actual final goal, but laying out the logic- here is what I have. My code errors at the "and"

[VBA]
For i = 1 To Lrow
If Cells(i, "F") = "Hat" Or Cells(i, "F") = "Shoe" _
and if Cells(i, "M").numberformat = "0.0" Then
Cells(i, "M").interiorfill = vbYellow
End If
End If
Next i
[/VBA]