I am trying to count the cells in my worksheet which have a red background
colour. Is there anyway of determining the background colour of a cell?

Any suggestions/assistance would be greatly appreciated

Thank you

Have a look at

http://www.xldynamic.com/source/xld.ColourCounter.html

Rowan

"ac512" wrote:

I am trying to count the cells in my worksheet which have a red background
colour. Is there anyway of determining the background colour of a cell?

Any suggestions/assistance would be greatly appreciated

Thank you

Thanks very much for your very helpful response Rowan!
Much appreciated

"Rowan" wrote:

Have a look at

http://www.xldynamic.com/source/xld.ColourCounter.html

Rowan

"ac512" wrote:

I am trying to count the cells in my worksheet which have a red background
colour. Is there anyway of determining the background colour of a cell?

Any suggestions/assistance would be greatly appreciated

Thank you

Rowan

xlDynamic uses the function ColorIndex which appears not to be available in
my Excel 2000. I use the Dutch version but when I have the English formula
=ColorIndex(A1) automatically translated with the code below I get the error
message #NAME? What now?

Sub TranslateFormula()
Dim sTemp As String

sTemp = InputBox("Type the formula in English, with the leading equal
sign:")
ActiveCell.Formula = sTemp
End Sub


Jack Sons
The Netherlands

"Rowan" schreef in bericht
...
Have a look at

http://www.xldynamic.com/source/xld.ColourCounter.html

Rowan

"ac512" wrote:

I am trying to count the cells in my worksheet which have a red
background
colour. Is there anyway of determining the background colour of a cell?

Any suggestions/assistance would be greatly appreciated

Thank you

Jack

The ColorIndex Function is a user defined function and is not available in any
version of Excel.

Copy it from Bob's site to a workbook.


Gord Dibben Excel MVP

On Fri, 15 Apr 2005 09:16:38 +0200, "Jack Sons" wrote:

Rowan

xlDynamic uses the function ColorIndex which appears not to be available in
my Excel 2000. I use the Dutch version but when I have the English formula
=ColorIndex(A1) automatically translated with the code below I get the error
message #NAME? What now?

Sub TranslateFormula()
Dim sTemp As String

sTemp = InputBox("Type the formula in English, with the leading equal
sign:")
ActiveCell.Formula = sTemp
End Sub


Jack Sons
The Netherlands

"Rowan" schreef in bericht
...
Have a look at

http://www.xldynamic.com/source/xld.ColourCounter.html

Rowan

"ac512" wrote:

I am trying to count the cells in my worksheet which have a red
background
colour. Is there anyway of determining the background colour of a cell?

Any suggestions/assistance would be greatly appreciated

Thank you