Hi all
I have some code on a worksheet that basically dictates that the colour of text in column F is white unless the values of cells in column H are between 1-5 (see below).
On my Excel 2007, everything works fine and when a user selects a value between 1-5 in column H, it shows up (in black) the value of the relevant cell in column F.
However, in Excel 2003 there seems to be a delay in when this font colouring happens, and I was wondering if anyone knew why? (Unfortunately, most of the users of this worksheet will still be on Excel 2003.)
In 2003, when I select a value in H, I then need to navigate away from excel, then come back to it, and only then does the cell in column F show up as black - so is there a workaround for this? I'd be really grateful for any assistance!
Best wishes
Diane
' Data Validation List of numbers 1-5 and Select Score and default of ENTER SKILL LEVEL
Range("H4:H25").Select
Application.CutCopyMode = False
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="<<Enter your Skill Level>>, 1, 2, 3, 4, 5"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = "Please select a Skill Level between 1-5"
.ShowInput = True
.ShowError = True
End With
With Selection.Interior
.ColorIndex = 2
End With
' Conditional Formal on column F to show values when 1-5 entered in column H
Range("F4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=AND(H4>0,H4<6)"
With Selection.FormatConditions(1).Font
.Color = 1
End With
Bookmarks