Haven't looked at your workbook but.....see below for the code to change cell formatting. Put the vba code into the change event of your worksheet so it runs every time a user enters a value anywhere.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("H:H")) Is Nothing Then ' ensures only changes made to column H have an effect
If target.value > 0 and target.value < 5 then
cells(target.row, target.column - 2).font.colorindex = 1
else
cells(target.row, target.column - 2).font.colorindex = 0
end if
end if
end sub
Bookmarks