Here's a little something to change color based on cell value in the
current selection. You can then write a little code to sum up the
number of cells with an interior color index of a certain color. You
could even do that with a UDF.
Sub foofer()
Dim r As Range
For Each r In Selection
Select Case r.Text
Case "Fred"
r.Interior.ColorIndex = 6
Case "Tom"
r.Interior.ColorIndex = 4
Case Else
r.Interior.ColorIndex = xlNone
End Select
Next r
End Sub
Mitch wrote:
I'm looking to change the color of numbers based on the text beside the column.
Then I need to sum up the values based on those colors.

I started things by using a Conditional Format, but that won't work. I
believe I have the code for the rest of this project though.

Also I'm looking through the Visual Basic Editor, there is a listing of all
the functions you can use, but no real detail or what they do. Any
information on where to find that? I could do this on my own if I knew more
about the calls to Excel.