VBA For filling in records in excel with a color based on a number

[drcoz]

cleteh,

Here is some code that I modified that should do what your looking for, or at least point you in the right direction.

 With .Range("C3:C" & i).FormatConditions.Add(xlCellValue, xlGreater, 7)
            .Interior.Color = RGB(157, 255, 157)
            .Font.Color = RGB(157, 255, 255)        'green
        End With
        With .Range("C3:C" & i).FormatConditions.Add(xlCellValue, xlBetween, 0, 7)
            .Interior.Color = RGB(255, 255, 0)
            .Font.Color = RGB(255, 255, 0)         'Yellow
        End With
        With .Range("C3:C" & i).FormatConditions.Add(xlCellValue, xlLessEqual, 0)
            .Interior.Color = RGB(255, 53, 53)
            .Font.Color = RGB(255, 53, 53)          'red
        End With