how to make a cell or a row in excel blink !

  • Thread starter Thread starter Huy Nguyen
  • Start date Start date
H

Huy Nguyen

Now, I'm using Ms Excel version 2002. A row or Some rows of my Excel file
need blink to watch them easily, how to make it ?
Thanks a lot for listening to me.
 
'VBA CODE EXAMPLES
'
'Created by Bill Manville
'
'To create a blinking cell:
'
'If you define a new Style (Format / Style / Flash/ Add ) and apply
'that style to the cells you want to flash, paste the following code
'into a module sheet and run the procedure Flash from Auto-Open if
'desired you will get the text flashing alternately white and red.

Dim NextTime As Date

Sub Flash()
NextTime = Now + TimeValue("00:00:01")
With ActiveWorkbook.Styles("Flash").Font
If .ColorIndex = 2 Then .ColorIndex = 3 Else .ColorIndex = 2
End With
Application.OnTime NextTime, "Flash"
End Sub

Sub StopIt()
Application.OnTime NextTime, "Flash", schedule:=False
ActiveWorkbook.Styles("Flash").Font.ColorIndex = xlAutomatic
End Sub
 
Back
Top