Thread: blinking cell?
View Single Post
  #8   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.programming
ste mac ste mac is offline
external usenet poster
 
Posts: 117
Default blinking cell?

Hi Martyn, the code below will allow the text to blink as many times
as you would like, just adjust to suit...Cells(1, 1)= A1... in case you
didn't know....

Can we achieve this via plain formula or VBA?. I need to have a custom
conditional formatting (blinking background colour or highlighting going
on/off) for cells that fulfill a certain condition.


Public Sub fla****()
ActiveSheet.Cells(1, 1) = "look"
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = ""
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = "look"
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = ""
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = "look"
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = ""
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = "look"
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = ""
Application.Wait (Now + TimeValue("0:00:01"))
ActiveSheet.Cells(1, 1) = "look"
Application.Wait (Now + TimeValue("0:00:01"))
End Sub

Hope this helps...

seeya ste