Function GetColorindex(rng as Range)
GetColorindex = rng.Interior.Colorindex
End Function

but as a colour change triggers no events, it will not update if you change
the colour.

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"nc" wrote in message
...
Are there any function that can return information on the color format of
a
cell?