Is there a function, or some VBA code that will detect
that a user has applied a fill color to a cell? I want to
reference a cell, and with a =IF function, apply a
calculation to colored cells.

Hi Tony
There isn't anything that comes with Excel.
However, have a look at this site for processing of coloured cells.

www.xldynamic.com/source/xld.colourCounter.html


HTH
Michael

"Tony Rice" wrote:

Is there a function, or some VBA code that will detect
that a user has applied a fill color to a cell? I want to
reference a cell, and with a =IF function, apply a
calculation to colored cells.

Many thanks Mike - can't get the link to work right now -
I will try gain later

regards

Tony

-----Original Message-----
Hi Tony
There isn't anything that comes with Excel.
However, have a look at this site for processing of
coloured cells.

www.xldynamic.com/source/xld.colourCounter.html


HTH
Michael

"Tony Rice" wrote:

Is there a function, or some VBA code that will detect
that a user has applied a fill color to a cell? I want
to
reference a cell, and with a =IF function, apply a
calculation to colored cells.

.

Sub iffillcolor()
For Each c In Selection
If c.Interior.ColorIndex 0 Then c.Value = 1
Next
End Sub

--
Don Guillett
SalesAid Software

"Tony Rice" wrote in message
...
Is there a function, or some VBA code that will detect
that a user has applied a fill color to a cell? I want to
reference a cell, and with a =IF function, apply a
calculation to colored cells.

Tony

As an alternative, try Chip Pearson's site.

http://www.cpearson.com/excel/colors.htm


Gord Dibben Excel MVP

On Sun, 6 Mar 2005 19:40:42 -0800, "Tony Rice" wrote:

Many thanks Mike - can't get the link to work right now -
I will try gain later

regards

Tony

-----Original Message-----
Hi Tony
There isn't anything that comes with Excel.
However, have a look at this site for processing of
coloured cells.

www.xldynamic.com/source/xld.colourCounter.html


HTH
Michael

"Tony Rice" wrote:

Is there a function, or some VBA code that will detect
that a user has applied a fill color to a cell? I want
to
reference a cell, and with a =IF function, apply a
calculation to colored cells.

.