Any formula to count number of cells with a specific color pattern

[Stu]

Is there any formula to count the number of cells (and total the numerical
content of those cells) with a specific color pattern?

 

[Gary''s Student]

Yes see:
http://www.cpearson.com/excel/colors.htm

 

[ryguy7272]

This function should give you what you want:
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
'or Range("K2").Value = cnt
Range("G1").Value = cnt
End Sub

Notice, it is set up to count the number of cells that are colored red:
cell.Interior.ColorIndex = 3

Look here for other Excel color IDs:
http://www.geocities.com/davemcritchie/excel/colors.htm


Regards,
Ryan---