Thema Datum  Von Nutzer Rating
Antwort
27.05.2024 15:34:13 Alain Kauffmann
NotSolved
27.05.2024 18:40:03 xlKing
NotSolved
Rot Blinkende Zellen
 27.05.2024 19:35:05 xlKing
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
27.05.2024 19:35:05		 Views:
97		 Rating:
     
Antwort:
  Ja
Thema:
Blinkende Zellen

Hier mal die einfachste Lösung blinkende Zellen darzustellen. Ist mir grade eingefallen. Weiß nicht ob da schon jemand drauf gekommen ist. Hab jetzt nicht danach recherchiert:

Mach einfach zwei Bedingte Formatierungen mit der selben Bedingung. Die eine formatierst du z.B. mit Rotem hintergrund und weißer Schrift, die zweite mit blauem Hintergrund und grüner Schrift. Beide müssen wie gesagt die gleiche Bedingung aufweisen. Außerdem ist es hilfreich, wenn du bei beiden das Häkchen bei Anhalten setzt.

Führe dann folgen Code aus:

Sub Blink()
  Dim start As Single
  For i = 1 To 20
    start = Timer
    Do: Loop Until Timer > start + 0.33 Or Timer < start
    ActiveSheet.Cells.FormatConditions(1).SetLastPriority
  Next i
End Sub

Den Code kannst du entweder manuell anstoßen oder z.B. über das Workbook_Open-Ereignis aufrufen. Hier ist z.B. definiert, dass es 20 mal blinken soll mit einer Frequenz von 3 Wechseln pro Sekunde.  (1 / 3 = 0,33)

Gruß Mr. K.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
27.05.2024 15:34:13 Alain Kauffmann
NotSolved
27.05.2024 18:40:03 xlKing
NotSolved
Rot Blinkende Zellen
 27.05.2024 19:35:05 xlKing
NotSolved