How do I highlight cells on a worksheet that contain formulas

R

Rick S.

Is there a way to use conditional formatting to highlight any cells on a
worksheet that contain a formula?
 
B

Bob Phillips

Add a custom function like


Function Is(rng As Range) As Boolean
If rng.Count > 1 Then
IsFormula = CVErr(xlErrValue)
Else
IsFormula = rng.HasFormula
End If
End Function


and use =IsFormula(A1) in the CF


--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)
 
D

Dave Peterson

Just a typo alert:

Function Is(rng As Range) As Boolean
should be:
Function IsFormula(rng As Range) As Boolean
 
Top