Count Colors

[sampi]

Hi
How to count colors with a user defined function in the book attached?
Thanks

 

[Marc L]

Hi, according to your attachment a non CF counting color function :​

Function CountColor&(Rg As Range, Rc As Range)
    For Each Rg In Rg:  CountColor = CountColor - (Rg.Interior.Color = Rc.Interior.Color):  Next
End Function

Do you like it ? So thanks to click on bottom right Like !​

​