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

Function for summing or counting cells based on a specified fill color 2
how can I use conditional formatting with formula and 3 poss resul 1
How to extract separated text by many commas in Excel? 0
Sum of values typed in a specific color 1
How to type each letter of the alphabet automatically in a specific color in Word? 0
Word Globally Changing Specific Color Highlight to Background Color 0
Conditional formatting for more than 3 variables 8
How can I add the values based the color of font and the date 1

Top