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

Zellen blinken bei Bedingung

Forumthread: Zellen blinken bei Bedingung

Zellen blinken bei Bedingung
26.05.2003 14:48:22
Alyssia
Dear all
ich möchte gerne in meinem Excel-File eine Zelle zum blinken bringen, wenn eine bestimmte Bedingung erfüllt ist (z.B. die aktuelle Kalenderwoche).

habe absolut kein Plan und hoffe, dass mir jemand helfen kann.

thanx Alyssia

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Zellen blinken bei Bedingung
26.05.2003 14:50:23
Georg_Zi

Hallo Alyssia

Benutze mal de Recherche

Gruß Hajo

Zur Zeit ist die automatische E-Mailbenachrichtigung abgeschaltet. Damit ist es dem Zufall überlassen, ob ich auf Rückfragen antworte.
Ich habe keine Lust in gewissen Abständen das Forum nach meinen Beiträgen zu durchsuchen, um zu sehen ob Rückfragen gibt.


Anzeige
Re: Zellen blinken bei Bedingung
26.05.2003 14:51:21
Umbratus

Hallo Alyssia

kuck doch bitte in die Recherche bzw benutz die Suche, bevor du einen Thread eröffnest, ich glaube das Thema is schon zigmal behandelt worden.


Gruß Umbratus

Re: Zellen blinken bei Bedingung
26.05.2003 14:52:45
Kl@us-M.

Hi Alyssia,
´ne blinkende Zelle erfordert einiges an Code (zumal Du ja wahrscheinlich weiterarbeiten willst, während die Zelle blinkt).
Vielleicht tut´s ja auch eine entsprechende Einfärbung der Zelle, die Du über die BEDINGTE FORMATIERUNG erheblich einfacher realisieren kannst.
Gruss aus dem Hunsrück
Klaus-Martin

Anzeige
;
Anzeige

Infobox / Tutorial

Zellen zum Blinken bringen in Excel


Schritt-für-Schritt-Anleitung

Um eine Zelle in Excel zum Blinken zu bringen, benötigst Du VBA (Visual Basic for Applications). Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11: Dies öffnet den VBA-Editor.

  2. Füge ein neues Modul hinzu:

    • Klicke auf Einfügen > Modul.
  3. Füge den folgenden Code ein:

    Dim WithEvents Timer As clsTimer
    
    Sub StartBlink()
       Set Timer = New clsTimer
       Timer.StartTimer 1 ' Blinkintervall in Sekunden
    End Sub
    
    Sub StopBlink()
       Timer.StopTimer
    End Sub
  4. Erstelle eine Klasse für den Timer:

    • Klicke erneut auf Einfügen > Klasse.
    • Nenne die Klasse clsTimer und füge folgenden Code ein:
    Dim TimerInterval As Double
    Dim NextTick As Double
    
    Public Sub StartTimer(ByVal Interval As Double)
       TimerInterval = Interval
       NextTick = Now + TimeValue("00:00:" & TimerInterval)
       Application.OnTime NextTick, "Blink"
    End Sub
    
    Public Sub StopTimer()
       On Error Resume Next
       Application.OnTime NextTick, "Blink", , False
    End Sub
    
    Sub Blink()
       If Range("A1").Interior.Color = RGB(255, 255, 255) Then
           Range("A1").Interior.Color = RGB(255, 0, 0) ' Farbe ändern
       Else
           Range("A1").Interior.Color = RGB(255, 255, 255) ' Farbe zurücksetzen
       End If
       StartTimer TimerInterval
    End Sub
  5. Starte das Blinken: Gehe zurück zu Excel und führe StartBlink in der VBA-Konsole aus.


Häufige Fehler und Lösungen

  • Fehler: Zelle blinkt nicht: Stelle sicher, dass Du die Makros aktiviert hast. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center und aktiviere die Makros.

  • Fehler: Excel friert ein: Überprüfe das Intervall im Timer. Ein zu kurzes Intervall kann Excel überlasten.


Alternative Methoden

Eine einfachere Methode, um Aufmerksamkeit zu erregen, ist die Bedingte Formatierung. So kannst Du die Zelle einfärben:

  1. Wähle die Zelle aus.
  2. Gehe zu Start > Bedingte Formatierung > Neue Regel.
  3. Wähle Formel zur Ermittlung der zu formatierenden Zellen verwenden.
  4. Gib eine Bedingung ein, z.B. =WOCHE(HEUTE())=WOCHE(A1).
  5. Wähle eine Formatierung (z.B. rote Füllung) und klicke auf OK.

Praktische Beispiele

Ein praktisches Beispiel ist das Blinken einer Zelle, wenn die aktuelle Woche erreicht wird. Nutze dafür den oben genannten VBA-Code und passe die Bedingung im Code entsprechend an.


Tipps für Profis

  • Verwende benutzerdefinierte Farben im VBA-Code, um das Blinken individueller zu gestalten.
  • Experimentiere mit verschiedenen Blinkintervallen, um die gewünschte Effektivität zu erzielen.

FAQ: Häufige Fragen

1. Frage
Wie stoppe ich das Blinken der Zelle?
Antwort: Führe StopBlink in der VBA-Konsole aus, um das Blinken zu stoppen.

2. Frage
Kann ich mehrere Zellen zum Blinken bringen?
Antwort: Ja, Du kannst den Code anpassen, um mehrere Zellen gleichzeitig zu steuern, indem Du die entsprechenden Zellreferenzen im Blink-Code änderst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige