Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
I have more than 6 conditions when using conditional formatting?
It only let's me set 6 conditons but I have a spreadsheet with over 10
conditions that I want to show so using conditional formatting at all becomes a problem if I can't highlight all 10 conditions anyway. Is there any way to add more than the default of 6 as a maximum? |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
I have more than 6 conditions when using conditional formatting?
You have 6 conditions. That is 3 more than anyone else <vbg.
You could try event code, such as Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "H1:H10" On Error GoTo ws_exit: Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then With Target Select Case .Value Case 1: .Interior.ColorIndex = 3 'red Case 2: .Interior.ColorIndex = 6 'yellow Case 3: .Interior.ColorIndex = 5 'blue Case 4: .Interior.ColorIndex = 10 'green End Select End With 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 try the free add-in at http://www.xldynamic.com/source/xld.....Download.html -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Magda" wrote in message ... It only let's me set 6 conditons but I have a spreadsheet with over 10 conditions that I want to show so using conditional formatting at all becomes a problem if I can't highlight all 10 conditions anyway. Is there any way to add more than the default of 6 as a maximum? |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
I have more than 6 conditions when using conditional formattin
Thanks Bob.
The 6 was a typo by me! Sorry, I did mean 3! Obviously, that's the maximum allowed.... I will try the event code you referred to. Thanks for you input. Magda "Bob Phillips" wrote: You have 6 conditions. That is 3 more than anyone else <vbg. You could try event code, such as Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "H1:H10" On Error GoTo ws_exit: Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then With Target Select Case .Value Case 1: .Interior.ColorIndex = 3 'red Case 2: .Interior.ColorIndex = 6 'yellow Case 3: .Interior.ColorIndex = 5 'blue Case 4: .Interior.ColorIndex = 10 'green End Select End With 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 try the free add-in at http://www.xldynamic.com/source/xld.....Download.html -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Magda" wrote in message ... It only let's me set 6 conditons but I have a spreadsheet with over 10 conditions that I want to show so using conditional formatting at all becomes a problem if I can't highlight all 10 conditions anyway. Is there any way to add more than the default of 6 as a maximum? |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
I have more than 6 conditions when using conditional formattin
I know, I was only kidding
Bob "Magda" wrote in message ... Thanks Bob. The 6 was a typo by me! Sorry, I did mean 3! Obviously, that's the maximum allowed.... I will try the event code you referred to. Thanks for you input. Magda "Bob Phillips" wrote: You have 6 conditions. That is 3 more than anyone else <vbg. You could try event code, such as Private Sub Worksheet_Change(ByVal Target As Range) Const WS_RANGE As String = "H1:H10" On Error GoTo ws_exit: Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then With Target Select Case .Value Case 1: .Interior.ColorIndex = 3 'red Case 2: .Interior.ColorIndex = 6 'yellow Case 3: .Interior.ColorIndex = 5 'blue Case 4: .Interior.ColorIndex = 10 'green End Select End With 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 try the free add-in at http://www.xldynamic.com/source/xld.....Download.html -- HTH Bob Phillips (remove nothere from email address if mailing direct) "Magda" wrote in message ... It only let's me set 6 conditons but I have a spreadsheet with over 10 conditions that I want to show so using conditional formatting at all becomes a problem if I can't highlight all 10 conditions anyway. Is there any way to add more than the default of 6 as a maximum? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
More than 3 Conditional Formatting Conditions | Excel Worksheet Functions | |||
Conditional formatting capability for 20+ conditions not just 3. | Excel Discussion (Misc queries) | |||
Additional Conditions for Conditional Formatting | Excel Worksheet Functions | |||
Conditional formatting: I have five conditions, how to do this? | Excel Discussion (Misc queries) | |||
Adding more than three Conditions to 'Conditional Formatting' | Excel Discussion (Misc queries) |