Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Blinkende Zelle bei Excel ??





Frage

Hallo kann ich eigendlich in einer Excel Tabelle eine Zelle ständig farbig blinken lassen ?? Wenn ja wie ?? Danke für die Antwort.

Antwort 1 von coros

Ja, das geht,

Code in Diese Arbeitsmappe einfügen:

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Ende
End Sub

Private Sub Workbook_Open()
If ThisWorkbook.Worksheets("Tabelle1").Range("A1") = 10 Then ersteFarbe
End Sub


Code in ein Modul einfügen:

Option Explicit
Public ET As Variant

Sub ersteFarbe()
ThisWorkbook.Worksheets("Tabelle1").Range("A1").Interior.ColorIndex = 3
ET = Now + TimeValue("00:00:01")
Application.OnTime ET, "zweiteFarbe"
End Sub

Sub zweiteFarbe()
ThisWorkbook.Worksheets("Tabelle1").Range("A1").Interior.ColorIndex = 33
ET = Now + TimeValue("00:00:01")
Application.OnTime ET, "ersteFarbe"
End Sub

Sub Ende()
On Error Resume Next
Application.OnTime EarliestTime:=ET, Procedure:="ErsteFarbe", Schedule:=False
Application.OnTime EarliestTime:=ET, Procedure:="zweiteFarbe", Schedule:=False
ET = ""
End Sub



Ich hoffe, ich konnte Dir weiterhelfen,
coros
Und nicht vergessen, hier noch einmal zu posten, ob Dich die Hilfe weitergebracht oder sogar Dein Problem gelöst hat.

Antwort 2 von bemey

Hallo

alles klar...vielen Dank. War genau der richtige Tip !!!!