Try this UDF in your CF.

Function IsFormula(cell)
Application.Volatile
IsFormula = cell.HasFormula
End Function

Copy/paste to a general module then select all cell on your worksheet and

In CF Formula is: =IsFormula(A1)


Gord Dibben MS Excel MVP

On Tue, 4 Apr 2006 12:18:20 -0500, qwopzxnm
<qwopzxnm.25r2ja_1144171202.944@excelforum-nospam.com> wrote:

>
>Max and Pete thank you both for your replies.
>
>Max - Your method works great however if I continue to add formulas to
>the worksheet I would need to keep repeating this each time. Is ther a
>way to automate this so that if I add a formula to a cell it will
>automatically format the text?
>
>Pete - To use conditional formatting, what formula works best to test
>if a cell is a formula or not?