View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
ryguy7272 ryguy7272 is offline
external usenet poster
 
Posts: 2,836
Default Counting cell colours

Take a look at this:
(Counting Cells With A Specific Color)
http://www.cpearson.com/excel/colors.htm


You could try this macro too:
Sub countcolor()
Dim rng As Range
Dim cnt As Long

Set rng = Range("A1:E12")
cnt = 0

For Each cell In rng
If cell.Interior.ColorIndex = 3 Then
cnt = cnt + 1
End If
Next
MsgBox cnt
Range("G1").Value = cnt
End Sub



Regards,
Ryan--

--
RyGuy


"jc132568" wrote:

Dear experts,
In my worksheets I have a "traffic light" system where cells with particular
values turn assigned cells in another location red, green or yellow using
conditional formatting. This provides me with a quick reference. My
question is can I count cells according to their colouring. Then I could say
I've got 20 cases complete, 10 cases in process, and 2 cases pending for
example. I know I could count the cells at the site of the original data but
counting the "traffic lights" would add to my summary info.
Thanks
JC