Thanks,
Tim
Try this. Alt +f11 to open vb editor. Right click 'This Workbook' and paste
the code below in.
The select your cell (say A1)and
Format|Conditional format
Formula is
=isformula(a1)
Pick a colour
OK
use format painter to copt the CF to other cells.
Function ISFORMULA(c As Range) As Boolean
ISFORMULA = c.HasFormula
End Function
Mike
You may also try this
Go to insert name (name the formula as “cellhasformula”) and in the “Refers
to” box, type the following formula = get.cell(48,indirect(“rc”,false)).
Now in the conditional formatting dialog box, type =cellhasformula in the
"Formula is". Use the desired formatting.
--
Regards,
Ashish Mathur
Microsoft Excel MVP
www.ashishmathur.com
"tsbarr" <tsb...@discussions.microsoft.com> wrote in message
news:5F44F43E-19B5-4406...@microsoft.com...