Add this UDF to a module in your workbook.

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

In CFFormula is: =IsFormula(cellref)


Gord Dibben MS Excel MVP


On Mon, 30 Apr 2007 11:32:01 -0700, nastech
wrote:

Hi, is there a formula for cond. format, if cell is formula / not a formula,
then no formatting / background color. this would occur if typing a number
in place of formula. thanks