With some help, the following code does the trick for the date part.


Code:
--------------------
For Each c In Range("DP6_Date_Start")
Select Case Month(c.Value)
Case 1, 2, 12
c.Offset(0, -6).Font.ColorIndex = 3
Case 3, 4, 5
c.Offset(0, -6).Font.ColorIndex = 50
Case 6, 7, 8
c.Offset(0, -6).Font.ColorIndex = 5
Case 9, 10, 11
c.Offset(0, -6).Font.ColorIndex = 0
End Select
Next c
--------------------


Now I just need to figure out the DP6_Name vs Alt_Name part


--
BrianDP1977
------------------------------------------------------------------------
BrianDP1977's Profile: http://www.excelforum.com/member.php...o&userid=29110
View this thread: http://www.excelforum.com/showthread...hreadid=490642