Sorry. I should have told you that the cell I want to flash between the 2
colours already contains an IF formula
=IF(S28<=0," ",IF(N28=P9," ",IF(N28<P9,"Replace Your Clone")))
There is also a Conditional format linked to the cell as well.


"Desert Piranha" wrote:


barry24uk Wrote:
I think the question speaks for itself.
Hi Barry,
Try this, cange to suit your needs
'----------
Public Sub Blink()
Dim appTime
With Sheets(1).Range("A1").Interior
If .ColorIndex = 4 Then
.ColorIndex = 3
Else
.ColorIndex = 4
End If
End With
appTime = Now() + TimeValue("00:00:01")
Application.OnTime appTime, "Blink"
End Sub
'----------


--
Desert Piranha


------------------------------------------------------------------------
Desert Piranha's Profile: http://www.excelforum.com/member.php...o&userid=28934
View this thread: http://www.excelforum.com/showthread...hreadid=497233