That's the problem with UDF's that rely on formatting. They don't update when
the formatting changes.

You could use:
Function GetColor(myCell As Range)
application.volatile '<-- added
GetColor = myCell.Font.ColorIndex
End Function

But this only insures that the function will recalculate when excel
recalculates. Don't trust the results until you force that recalc.

That's why I'd use the X and base the conditional formatting on that other cell.




gudencough wrote:

Perfect! Thank you.
Do you know of anyway to get column B to automatically update if you format
a number in column A 'red'. Righ now you have to double click on the column B
cell and press enter to update it.

"Brad" wrote:

Two steps

Step one create a custom function - if you haven't created a macro before -
do a search of "custom functions excel" - high level "alt f11" add a module
and insert the following code.

Function GetColor(myCell As Range)
GetColor = myCell.Font.ColorIndex
End Function

Step two add the following
=IF(GetColor(A3)=3,"x","")


--
Wag more, bark less


"gudencough" wrote:

I have a list of numbers in column A. Some are formated in 'red' color and
the others are 'black'. How do i format column B so there is an 'X' next to
the numbers that are 'red' and nothing next to numbers that are 'black.'

Thank you

--

Dave Peterson