Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

blinkende excel-zelle

Forumthread: blinkende excel-zelle

blinkende excel-zelle
11.05.2005 07:13:53
adolpho
hallo,
kann mir jemand sagen bzw. einen tipp geben, wie ich meine excel-zelle bei einer abfrage zum blinken bringe?
gruss
adolpho
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: blinkende excel-zelle
11.05.2005 07:30:17
marcl
Hallo adolpho,
wenn man unter blinken hier im Forum sucht, findet man folgendes:
******************************* Zelle blinken lassen ******************************

Sub BlinkenEin()
Dim NextTime As Date
NextTime = Now + TimeValue("00:00:01")
With ActiveCell
If .Interior.ColorIndex = 6 Then
.Interior.ColorIndex = 9
Else
.Interior.ColorIndex = 6
End If
If .Interior.ColorIndex = 9 Then
.Font.ColorIndex = 6
Else
.Font.ColorIndex = 9
End If
End With
Application.OnTime NextTime, "BlinkenEin"
End Sub


Sub BlinkenEnde()
On Error GoTo ErrorHandler
Application.OnTime Now, "BlinkenEin", schedule:=False
ActiveCell.Interior.ColorIndex = xlNone
ActiveCell.Font.ColorIndex = xlAutomatic
End
ErrorHandler:
Call BlinkenEnde
End Sub

Gruß
marcl
Anzeige
AW: blinkende excel-zelle
11.05.2005 07:37:39
Thomas
Hallo adolpho,
und wenn Dir das VBA-Zeugs zu holprig ist, schau mal auf meiner Webseite. Dort findest Du den "BlinkerServer" (Freeware) und den "rtdBlinker" (kann man als Formel eingeben).
Gruß
Thomas
Risi Thomas Softwareentwicklung
COM-Addins +++ RTD-Server +++ Komponenten
Anzeige
AW: blinkende excel-zelle
11.05.2005 15:13:06
adolpho
hallo marcl,
hallo thomas,
danke für eure unterstützung.
gruss
adolpho
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige