Home > Excel Tutorial > Flashing Cell

Flashing Cell

If the value of A1 cell is greater than 5 ,A1 cell flashes.

You can use the cells you want to give a warning.

Vba Modul Codes :
Public dur As Boolean
Sub auto_open()
If Range(“A1”).Value > 5 Then
Call basla
End If
End Sub

Sub auto_close()
dur = True
End Sub

Sub basla()
If dur = True Then Exit Sub
If Range(“A1”).Value <= 5 Then
Exit Sub
End If
If Format(Now, “ss”) Mod 2 = 0 Then
Range(“A1”).Interior.Color = vbRed
Range(“A1”).Font.Color = vbWhite
Range(“A1”).Font.Size = 11
Range(“A1”).Font.Bold = True
Else
Range(“A1”).Interior.ColorIndex = xlNone
Range(“A1”).Font.Color = vbBlack
Range(“A1”).Font.Bold = False
End If

Call saat
End Sub
Sub saat()
Application.OnTime Now + TimeValue(“00:00:01”), “basla”
End Sub

For Download Template Click Here

  1. No comments yet.
  1. No trackbacks yet.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: