Conditional Formatting can be used to identify cells that have formulas in them. This can be useful if you have a sheet with data entry cells mixed with computations by helping the user to see where they should be entering data.
I don’t know of any way to test a cell for a formula using built-in functions, so we’ll have to resort to a user-defined function (UDF).
Function CellHasFormula(rTarget As Range) As Boolean
If IsEmpty(rTarget) Then
CellHasFormula = True
CellHasFormula = rTarget.HasFormula
Why test for empty cells? I like to highlight cells where the user is supposed to enter data, not the other way around. For that reason, I generally couple the UDF with a NOT() function. I dislike negative fucntions, except NOT(), so I don’t write a CellDoesntHaveFormula() function. Just another peek into the depths of my insanity. In this example, I apply the conditional formatting to A2:E7.