Blinkt Text kann das Auge auf einen bestimmten Zelle der Tabellenkalkulation oder Zellbereich zu ziehen , und den Benutzer auf wichtige Informationen . Obwohl Sie Text in vielen Farben und Schriftarten in Microsoft Excel ändern kann, wird das Programm nicht über eine integrierte Funktion , die Text blink macht . Mit Visual Basic für Applikationen ( VBA) , jedoch können Sie maßgeschneidert Excel an Ihre Bedürfnisse anpassen - und dazu gehört auch die Schaffung eines Programmier-Modul , das Text blink machen. Anleitung
1
Öffnen Sie die Visual Basic-Editor durch Drücken von " Alt" und " F11 " zusammen .
2
Klicken Sie auf " Einfügen" und klicken Sie dann auf " Neues Modul . "
3
Kopieren Sie den folgenden Code in das Modul-Fenster blank :
Öffentliche RunWhen As Double
Sub StartBlink ()
Mit ThisWorkbook.Worksheets ( " Tabelle1 " ) . Range (" A1") . Font
. ColorIndex = 3 Then ' Red Text
. ColorIndex = 2 ' White Text
< p> Else
. ColorIndex = 3 'Red Text
End If End With
RunWhen = Now + TimeSerial ( 0,0,1)
Application.OnTime RunWhen , " '" & ThisWorkbook.Name & "' ! StartBlink " , , Wahre
End Sub Sub
StopBlink ()
< p > ThisWorkbook.Worksheets ( " Tabelle1 " ) . Range (" A1") . Font.ColorIndex = _
xlColorIndexAutomatic
Application.OnTime RunWhen , " '" & ThisWorkbook.Name & "' ! StartBlink " , ändern Falsch
End Sub
4
die dritte Zeile des Codes auf die tatsächliche Anzahl Blatt und die Zellzahl Sie wollen zu blinken. Die Adresse der Zelle kann ein Bereich sein . Zum Beispiel, um die Zellen B1 bis B10 blinken zu lassen , ersetzen Sie "A1" auf " B1: . B10 "
5
Klicken Sie auf " Diese Arbeitsmappe " aus der Liste in der linken Seitenleiste
< br . > 6
Cut und fügen Sie den folgenden Code in das Modul-Fenster blank :
private Sub Workbook_Open ()
StartBlink
End Sub
