establishing the background colour of a cell

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" <[email protected]> schreef in bericht
news:[email protected]...
> 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" <[email protected]> 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" <[email protected]> schreef in bericht
>news:[email protected]...
>> 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
>