How to assign value to colors for dummies

[southernsquid]

I have a simple speadsheet for hundreds of people and I am just filling cells with red or green when tasks are complete. I want to track progress by percentage, but I first need to assing each color a value. Green=100 and Red=0. I can then average the rows after that. How do I assign the values to a color? Thanks

 

[Scott Huish]

That is Conditional Formatting.

Select the range you want to color, go into Conditional Formatting,
Cell Value is equal to 0, format fill as red
Cell Value is equal to 100, format fill as green

 

[southernsquid]

Hot Pepper, thanls for the response. I can do Conditional Formatting which I don't believe this is. I don't want to enter a value in the cell, I want to fill it with a color and have excel apply a value to that color. Can anyone help?
Thanks

 

[Scott Huish]

Coloring a cell doesn't fire any event code.
You could color the cell then run a macro to fill in the values if that is acceptable.

You didn't specify your range, so I used UsedRange, alter to suit:

Sub test()
Dim c As Range, clr As Long
For Each c In ActiveSheet.UsedRange.Cells
    If IsNumeric(c) And c <> "" Then
        Select Case c
            Case 0: MsgBox "Got Here": clr = RGB(34, 173, 31)
            Case 100: clr = vbRed
            Case Else: clr = xlNone
        End Select
        c.Interior.color = clr
    End If
Next
End Sub