Search : in
By :

Excel make cell flash red

Last answer on Oct 26, 2009 5:08:12 am GMT hugrl, on Feb 9, 2009 5:19:01 pm GMT 
 Report this message to moderators

Hello,
In Excel I can make cell red when formula is greater than 4 but how do I GET CELL TO FLASH Office 2003

And can you in same spreadsheet link page with name under dates to sheet containing name in row to a number under same date IE j bloggs under 30 Mar in weekly sheet to a 1 under same date in monthy sheet every time name appears ( 160 name to go in)

Configuration: Windows Vista
Internet Explorer 8.0

Best answers for « Excel make cell flash red » in :
[Excel]changing cell formula to text Show [Excel]changing cell formula to text Issue Solution Notes Issue Consider that I have: In cell A4, it contains a formula =Sum(A1:B3)+A3/B2. How to extract this formula in cell A6 as a string of text? That is ... I want cell A6...
Excel cell flash when date is near Show
Pls help - Excel - Highlight cell if no data Show
Excel – Comparing cell A1 to entire A column in Sheet 2 ShowExcel – Comparing cell A1 to entire A column in Sheet 2 Issue Solution Note Issue I have been trying to compare sheet1 A2 to sheet2 A2 through A500 and if it exists somewhere in sheet2's a col then copy that entire row to a new sheet....
Excel tips : How to insert date in a cell ShowExcel tips : How to insert date in a cell Below are some tips on how to insert date and time in an excel cell for a specific purpose:- To insert current date, press CTRL + ; in the chosen cell. To insert current time, press CTRL+...
Repainting a cell using excel VBA ShowRepainting a cell using excel VBA Issue Solution Note Issue I am writing a code in excel VBA to generate a report.I am totally new to VBA.Here's my code Private Sub CommandButton1_Click() Dim a1 As Integer Dim d1 As Integer Dim...
Ask your question Reply

1

Helper, on Feb 10, 2009 12:59:58 am GMT
  • +7

Private Sub Flash_Cells()

Dim FlashColor As Integer
Dim MakeFlash As Range
Dim x As Integer
Dim TheSpeed
Dim i

'Just a random range of cells. Change it to whatever you want.
Set MakeFlash = Range("A1,C6,F3,H4")

For Each i In MakeFlash

If i.Value > 4 Then

FlashColor = 3 'Set the color to red

'Make the cell range flash fast: 0.01 to slow: 0.99
TheSpeed = 0.2

'Flash 7 times
Do Until x = 7

DoEvents
Start = Timer
Delay = Start + TheSpeed
Do Until Timer > Delay
DoEvents
MakeFlash.Interior.ColorIndex = FlashColor
Loop
Start = Timer
Delay = Start + TheSpeed
Do Until Timer > Delay
DoEvents
MakeFlash.Interior.ColorIndex = xlNone
Loop
x = x + 1
Loop

End If
Next i

End Sub

   
Reply to Helper

3

Dave, on May 8, 2009 8:39:33 pm BST

Drop this code all under "ThisWorkbook" in VBAProject window. Change anything in bold to fit your spreadsheet. This will actually flash yellow - change 6's to 3's if you want Red

Private NextFlash As Double
Private Const FR As String = "'[Name Of Your Workbook.xls]Name Of Your Sheet'!A3"
Sub StartFlashing()
If Range(FR).Interior.ColorIndex = 6 Then
Range(FR).Interior.ColorIndex = xlColorIndexNone
Else
Range(FR).Interior.ColorIndex = 6
End If
NextFlash = Now + TimeSerial(0, 0, 1)
Application.OnTime NextFlash, "ThisWorkbook.StartFlashing", , True
End Sub
Sub StopFlashing()
Range(FR).Interior.ColorIndex = xlColorIndexNone
Application.OnTime NextFlash, "ThisWorkbook.StartFlashing", , False
End Sub
Private Sub Workbook_Open()
ThisWorkbook.StartFlashing
End Sub
Private Sub Workbook_Close()
ThisWorkbook.StopFlashing
End Sub

   
Reply to Dave

4

jubei, on Jul 27, 2009 8:44:38 pm BST

Thank you dave, it works, it really works.

   
Reply to jubei

5

 MCH, on Oct 26, 2009 5:08:12 am GMT
  • +1

I used you macro to make cells flash and It works great.I have 7 cells listed c3,d3,e3,f3,g3,h3,i3 They all flash can you tell how to make thecell that has high number only flash. Thanks

   
Reply to MCH

2

hugrl, on Feb 23, 2009 12:21:50 pm GMT

Thanks ok

   
Reply to hugrl
Ask your question Reply
They need your help