Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Number of Conditional Formats
Can you have more than 3 conditional formats in Excel 2002? If so, how?
|
#2
|
|||
|
|||
You either do it with VBA event code, like so
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ws_exit: Application.EnableEvents = False If Not Intersect(Target, Range("A20")) Is Nothing Then Select Case Target.Value Case 1: Target.Interior.ColorIndex = 1 Case 2: Target.Interior.ColorIndex = 2 Case 3: Target.Interior.ColorIndex = 3 Case 4: Target.Interior.ColorIndex = 4 Case 5: Target.Interior.ColorIndex = 5 Case 6: Target.Interior.ColorIndex = 6 End Select End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. or you could try http://www.xldynamic.com/sourc*e/xld....Download.html -- HTH RP (remove nothere from the email address if mailing direct) "Jason Wiley" <Jason wrote in message ... Can you have more than 3 conditional formats in Excel 2002? If so, how? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Maximum Number of Cell Formats | Excel Discussion (Misc queries) | |||
How do I do conditional formatting on number formats not patterns. | Excel Discussion (Misc queries) | |||
Conditional formatting row when cell value is an even number | Excel Worksheet Functions | |||
Conditional Number Formats | Excel Discussion (Misc queries) | |||
Conditional Formats in Excel | Excel Worksheet Functions |