can i use the color of a cell to count the different colerd cells

C

Chip Pearson

Do you want to count the number of different colors? If so,


Dim Coll As New Collection
Dim Rng As Range
On Error Resume Next
For Each Rng In Range("A1:A10")
Coll.Add Rng.Interior.Color, CStr(Rng.Interior.Color)
Next Rng
Debug.Print "Different Colors: " & Coll.Count


Otherwise, post back with more details.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Using Collection to also capture range adjacent 10
can I get back previous version of a file I copied over in excel? 1
Help using Chip Pearsons code to count cells with color 9
Can I print a list of all of the worksheets within a workbook? 0
How do I change the forecolor of a CheckBox when True 2
Count and Sum the cells with color formatting 6
Unable to set the desired column width for a table with merged cells 0
Unable to set the desired column width for a table with merged cells 0

Top