One method.

Copy/paste this UDF to your workbook into a General Module.

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

Select the multiple cells........e.g. A1:A10

FormatCFFormula is: =NOT(IsFormula(A1))


Gord Dibben MS Excel MVP

On Wed, 13 Sep 2006 12:39:02 -0700, WC Turner <WC
wrote:

What I have is have a spreadsheet with multiple cell containing data. Some
of the data is retreived by a formual and some is due to a manual input of
numbers. I would like to have a conditional format that would shade the cell
if someone writes over the formula with a value.

Any help would be greatly appreciated.