ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Make cells flash. (https://www.excelbanter.com/excel-discussion-misc-queries/83015-make-cells-flash.html)

aacstv

Make cells flash.
 

I need to know the ste-by-step process on how to make cells flash.


--
aacstv
------------------------------------------------------------------------
aacstv's Profile: http://www.excelforum.com/member.php...o&userid=33440
View this thread: http://www.excelforum.com/showthread...hreadid=532529


Peo Sjobom

Make cells flash.
 
http://www.cpearson.com/excel/newposte.htm

--

Regards,

Peo Sjoblom

Excel 95 - Excel 2007
Nothwest Excel Solutions
www.nwexcelsolutions.com
"It is a good thing to follow the first law of holes;
if you are in one stop digging." Lord Healey


"aacstv" wrote in
message ...

I need to know the ste-by-step process on how to make cells flash.


--
aacstv
------------------------------------------------------------------------
aacstv's Profile:
http://www.excelforum.com/member.php...o&userid=33440
View this thread: http://www.excelforum.com/showthread...hreadid=532529




Michael M

Make cells flash.
 
Here's one version

Sub cell_animation()
again1:
Dim w As Worksheet
Set w = Worksheets("sheet1")
Randomize
n = 67
m = 5
w.Range(Chr(n) & m).Rows.Interior.Color = QBColor(Int((Rnd * 5) + 1))
DoEvents
Application.Wait (Now + 1 / 24 / 60 / 120 / 0.9)
'TimeValue("0:00:01"))
GoTo again1:
End Sub

HTH
Michael

"aacstv" wrote:


I need to know the ste-by-step process on how to make cells flash.


--
aacstv
------------------------------------------------------------------------
aacstv's Profile: http://www.excelforum.com/member.php...o&userid=33440
View this thread: http://www.excelforum.com/showthread...hreadid=532529




All times are GMT +1. The time now is 10:06 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com