Option Explicit
Sub highlight()
Dim iter As Long
' if you have a header than change 1 to 2
For iter = 1 To ActiveWorkbook.ActiveSheet.Range("A" & Rows.Count).End(xlUp).Row
If ActiveWorkbook.ActiveSheet.Cells(iter, "A").Value <> "" And _
ActiveWorkbook.ActiveSheet.Cells(iter, "C").Value <> "" And _
ActiveWorkbook.ActiveSheet.Cells(iter, "D").Value <> "" And _
ActiveWorkbook.ActiveSheet.Cells(iter, "F").Value <> "" Then
ActiveWorkbook.ActiveSheet.Cells(iter, "A").Interior.Color = RGB(220, 80, 20)
ActiveWorkbook.ActiveSheet.Cells(iter, "C").Interior.Color = RGB(220, 80, 20)
ActiveWorkbook.ActiveSheet.Cells(iter, "D").Interior.Color = RGB(220, 80, 20)
ActiveWorkbook.ActiveSheet.Cells(iter, "F").Interior.Color = RGB(220, 80, 20)
End If
Next iter
End Sub