Hi friends,

One of the reputable experts advised me to use the following code to return
the color index of a cell:

Public Function Color(ByVal rgeCell As Range) As Integer
Color = rgeCell.Interior.ColorIndex
End Function

The problem is that reply of such a function upon "change" of the colour of
the target cell doesn't update and I have to manually use F2 and then ENTER
again so as to update the value or copy and paste the same formula.

Furthermore any professional advice to have have such a formula working for
CONDTIONAL FORMATTING shall highly obliged.

Thanx in advance to all you pals.

FARAZ