How can I conditionally format cells that contain formulas?

Is it possible to create a conditional format for a group of cells that would
set a specific backgroup color for cells that contain formulas as opposed to
data?

I have been using "Go To...","Special","Formulas" but would prefer to have
the process happen automatically.

TIF ...

Create a UDF and use that in the CF formula


Function IsFormula(rng As Range)
IsFormula = rng.HasFormula
End Function




--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"jhofmann" <[email protected]> wrote in message
news:[email protected]...
> Is it possible to create a conditional format for a group of cells that
would
> set a specific backgroup color for cells that contain formulas as opposed
to
> data?
>
> I have been using "Go To...","Special","Formulas" but would prefer to have
> the process happen automatically.
>
> TIF ...

First enter this tiny UDF:

Function IsFormula(r As Range) As Boolean
IsFormula = r.HasFormula
End Function

Then set Conditional formatting: Formula is:

=(IsFormula(A1))

--
Gary''s Student


"jhofmann" wrote:

> Is it possible to create a conditional format for a group of cells that would
> set a specific backgroup color for cells that contain formulas as opposed to
> data?
>
> I have been using "Go To...","Special","Formulas" but would prefer to have
> the process happen automatically.
>
> TIF ...