So starten Sie Excel-Makros nach einer vorgegebenen Zeit

Sie können in Excel mit Hilfe des Befehls »BeiZeit« dafür sorgen, daß die Tabellenkalkulation eine bestimmte Zeitspanne nach dem Start eines Makros ein weiteres Makrostartet. Eine praktische Anwendung für diesen Befehl wäre zum Beispiel, eine Meldung nur kurz anzuzeigen. Das im unten angeführte Makro »Textfeld_anzeigen« erzeugt in der aktuellen Arbeitsmappe ein Textfeld mit dem Inhalt »Guten Morgen«. Nach der in der zweitletzten Zeile eingetragenen Zeit - im Beispiel sind es zehn Sekunden - wird das Makro »Textfeld_löschen« gestartet, das den Gruß wieder entfernt.

Wenn Sie eine andere Zeitspanne bis zum Start des zweiten Makros wünschen, müssen Sie den Zeitwert entsprechend ändern. Damit das zweite Makro nach genau einer Stunde aktiv wird, müßte der Zeitwert »01:00:00« eingestellt werden, um es nach 22 Minuten und 10 Sekunden zu starten, auf »00:22:10«.

Makrolisting zum Erzeugen eines Textfeldes:

Sub Textfeld_einfügen()

AktivesBlatt.TextfeldListe.Hinzufügen(80,25; 80,25; 434,25; 94,5).Auswählen

Auswahl.Zeichen.Text = "Guten Morgen!"

Mit Auswahl.Zeichen(Start:=1; Länge:=13).Schriftart

Auswahl.Innenbereich.FarbIndex = 20

Auswahl.HorizontaleAusrichtung = xlZentriert

Auswahl.VertikaleAusrichtung = xlZentriert

.Name = "Arial"

.Schriftstil = "Standard"

.Grösse = 24

Ende Mit

Anwendung.BeiZeit Jetzt + Zeitwert("00:00:10"); "Textfeld_löschen"

Ende Sub
Makrolisting zum Löschen des Textfeldes:
Sub Textfeld_löschen()

AktivesBlatt.TextfeldListe(1). Auswählen

Auswahl.Löschen

Ende Sub