Conditional Formatting
Is there a way to extend the range of conditional formatting to more than three conditions?
RE: Conditional Formatting
Yes, you can do it by using VBA coding. If you have not had any experience using VBA, this may be a steep learning curve.
STEPS:
Save your workbook, then activate the worksheet, right-click its Sheet Name tab, select View Code, and enter the following code:
----------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim icolor As Integer
If Not Intersect(Target, Range("A1:A10")) is Nothing Then
Select Case Target
Case 1 To 5
icolor = 6
Case 6 To 10
icolor = 12
Case 11 To 15
icolor = 7
Case 16 To 20
icolor = 53
Case 21 To 25
icolor = 15
Case 26 To 30
icolor = 42
Case Else
'Whatever
End Select
Target.Interior.ColorIndex = icolor
End If
End Sub
---------------
