Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Excel / New Users / February 2008

Tip: Looking for answers? Try searching our database.

Conditional formatting - Excel 2000

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
bobby - 03 Feb 2008 13:29 GMT
How do I get around to add more than just 3 conditions to a cell?

I need to be able to do much more like if the input into the cell is between
1 and 2 then fill color red, between 3 and 4 then fill color orange, between
5 an 6 fill color green, between 7 and 8 fill color blue and so forth for as
many as possible. Need it to visully show increment in temperatur mapping of
a freezer.
Bob Phillips - 03 Feb 2008 13:46 GMT
'-----------------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
'-----------------------------------------------------------------
Const WS_RANGE As String = "H1:H10"    '<=== change to suit

   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 <= 2: .Interior.ColorIndex = 3    'red
               Case <= 4: .Interior.ColorIndex = 46    'orange
               Case <= 6: .Interior.ColorIndex = 10   'green
               Case <= 8: .Interior.ColorIndex = 5    'blue
           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.

Signature

---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

> How do I get around to add more than just 3 conditions to a cell?
>
[quoted text clipped - 7 lines]
> of
> a freezer.
bobby - 03 Feb 2008 13:48 GMT
I found this link in the excel orumand it is just what I was loking for:

http://www.xldynamic.com/source/xld.CFPlus.Download.html

> How do I get around to add more than just 3 conditions to a cell?
>
[quoted text clipped - 3 lines]
> many as possible. Need it to visully show increment in temperatur mapping of
> a freezer.
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.