Excel - Ein Makro, mit dem Zellen zum Blinken gebracht werden
Problem
Ich möchte eine Zelle unter Excel zum Blinken bringen. Kann das ein Makro oder ein einfacherer Weg sein?
Lösung
-1. Wählen Sie die Zelle aus
-2. Wählen Sie im Menü Format die Option Stil.
-3. Geben Sie im Dialogfeld "Stil" einen neuen Stilnamen ein, z. B. "Blinken".
-4. Ändern Sie mithilfe der Steuerelemente im Dialogfeld die Stilattribute.
-5. Klicken Sie auf OK.
Dieser Stil kann auf die Zellen Ihrer Wahl angewendet werden.
Nun müssen Sie die Makros erstellen:
NextTime als Datum dimmen Sub StartFlash () NextTime = Now + TimeValue ("00:00:01") Mit ActiveWorkbook.Styles ("Blinken"). Schriftart If .ColorIndex = xlAutomatic Then .ColorIndex = 3 .ColorIndex = 5 - .ColorIndex End With Application.OnTime NextTime, "StartFlash" End Sub
-------------------------------------------------- ----------------------
Sub StopFlash () Application.OnTime NextTime, "StartFlash", Zeitplan: = False ActiveWorkbook.Styles ("Blinken"). Font.ColorIndex = xlAutomatic End Sub
- Um das Blinken zu starten, starten Sie einfach StartFlash
- Um es zu stoppen, verwenden Sie StopFlash .
Dieser Tipp basiert auf //exceltips.vitalnews.com/Pages/T0214_Flashing_Cells.html
Vielen Dank an Jeff für diesen Tipp.