excel vba change cell color based on a number value in a range

[bjason]

I need to change the cell color, in a range, to red if the cell contains a negative integer. I am relatively new to VBA. I have bee trying an if then function but I have been unsuccessful.

[SamT]

PseudoCode, Needs Expansion
Dim Cel As Range

For Ech Cel in SpecifiedRange
If Cel < 0 Then Cel.Interior.ColorIndex = 3
Next

[bjason]

Thank you for your help SamT. That worked perfectly

[SamT]

You're Welcome

Thanks for the Thanks. Makes my day :cloud9: