hi,
I think you may be right. color index 3 is red.
in vb help (alt+F11) look up the pattercolorindex property. it will show you
the delfaut colors and the corresponding index number. if you have custom
colors, then you must use the index number of the color you customized.

Regards
FSt1

"Roadmap" wrote:

I have a spreadsheet with 26 rows and 40 columns, some cells of which
have the background color of "tan". I need to count the colored cells
within each column. I've been going round and round with the vba
coding I found at http://www.xldynamic.com/source/xld.ColourCounter.html
- I copied the code into the vbs window, saved the module and returned
to the worksheet. In the last row of the first column, I pasted this
function: =SUMPRODUCT(--(ColorIndex(A1:A26)=3))

I know this must be very simple, but I cannot get the module to work.
One reason may be that the color is not 3 - but tan.

Any suggestions?