changing bacground colour if formula altered

[st120869]

Hello,
I have used the scrpit below to change the background colour of any cell contacts that have been changed. I would like to adapt it to only change cells when the user changes a formula inside the cells.

I do not want to protect the cell contents

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Interior.ColorIndex = 37
Target.Interior.Pattern = xlSolid
End Sub

[Bob Phillips]

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.HasFormula Then
Target.Interior.ColorIndex = 37
Target.Interior.Pattern = xlSolid
End If
End Sub


--

HTH

RP
(remove nothere from the email address if mailing direct)


"st120869" <[email protected]> wrote in
message news:[email protected]...
>
> Hello,
> I have used the scrpit below to change the background colour of any
> cell contacts that have been changed. I would like to adapt it to only
> change cells when the user changes a formula inside the cells.
>
> I do not want to protect the cell contents
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> Target.Interior.ColorIndex = 37
> Target.Interior.Pattern = xlSolid
> End Sub
>
>
> --
> st120869
> ------------------------------------------------------------------------
> st120869's Profile:
http://www.excelforum.com/member.php...o&userid=18330
> View this thread: http://www.excelforum.com/showthread...hreadid=496630
>