Thank you, unfortunately I don't know where to put that text?

Could you also help me there?

I want it to return the color in another column. I don't know if that got
through the last time.

"Gary''s Student" wrote:

Function txtclr(r As Range) As Integer
txtclr = r.Font.ColorIndex
End Function

This UDF will return the number corresponding to the font color.
--
Gary''s Student - gsnu200715


"FreddieP" wrote:

Hi.
I have in a single column the letter S written and it is formatted in
different colors. I would like to identify the different colors.

If it is black just return B or what ever word, just something sop I can
separate them from each other.

Like an if formula only it searches for formatting instead of a value.

Kind regardas
Freddie