All

I need to color the font in a cell red based on if the date contained in
that cell is past due or not. The part that complicates this is that I also
need to color the whole line a different color based on other requirements,
as shown below. Where those to are contained on the same row, I need to
color the interior of the row one color, and the date another. Hope that is
clear. Ive had many wonderful suggestions on how to color the whole row, but
not individual text in individual cells. Sorry for the newguy persistence on
this.


Dim i As Long
eRow = Cells(Rows.Count, 12).End(xlUp).Row
For i = eRow To 2 Step -1
With Rows(i).EntireRow.Interior
If Cells(i, 12).Value = "DOCK" Or Cells(i, 12).Value = "FROZ"
Or _
Cells(i, 12).Value = "Loan Repay" Or Cells(i, 12).Value =
"TRAN" Then
.ColorIndex = 4
.Pattern = xlSolid
End If
End With