How do I test a specific color in 2003?

S

Sp3ct4tor

I need to include a color test into If function.
Example:
If font text in cell A1 is green, then write "400"
(I have more colors to test than 2 so I can't use the CELL function)

Thanks in advance.
 
G

Gary''s Student

Try this UDF:

Function fontcolor(r As Range) As Integer
Application.Volatile
fontcolor = r.Font.ColorIndex
End Function
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Macro to Select text from a point given to a specific word 2
Excel - Wich Function should I use? 1
Function for summing or counting cells based on a specified fill color 3
How do I convert shading to highlighting for specific colors 8
Cumulative formula for word table 0
how can I use conditional formatting with formula and 3 poss resul 1
Link a text box based on drop down box with four options MS Word 365 0
how to get the content in bigger font and in color when points 0

Top