Be warned, This can get very complex and has a few very nasty curlies, I
know, I have done it.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"LeninVMS " wrote in message
...
You can use the FormatConditions property of the Range object to
distinguish between cells that have conditional formats and those that
do not.

E.g:

Count all red cells using cells(x,y).interior.colorindex

If (Cells(i,j).FormatConditions.Count<0) Then
'Identify color of cell and decrease count from total number of
red cells

End if

- Lenin


---
Message posted from http://www.ExcelForum.com/