Supportnet / Forum / Tabellenkalkulation
sleep oder timerfunktion in excel
Frage
Ich such seit langen vergebens nach Möglichkeiten Prozesse zeitgesteuert in VBA starten zu lassen. Weiterhin möchte ich z.Bsp. ein Informationsfenster öffnen lassen, die laufende prozedur sollte jedoch damit nicht unterbrochen werden und bei Abschluss dieser Prozesdur wird das geoefnette Fenster automatisch geschlossen (z.Bsp. fuer Datenaktuallisierung). Ich habe schon von der 'sleep' Funktion aus der shell-Umgebung gehört, habe jedoch mit dem Handling dieser Funktion und der Einbindung in VBA noch Probleme. Fuer informative Hilfe und Tipps waere ich sehr dankbar.
Viele Gruesse
Tino
Antwort 1 von Guenter
Hallo Tino,
wenn "Prozesse zeitgesteuert in VBA starten" bedeutet, dass nach Öffnen einer Excel-Datei ein Makro in z.B. 1 Minute weiterläuft, so ist das leicht möglich.
Für das Informationsfenster könnte man doch die Statusleiste verwenden?
Gruß
Günter
wenn "Prozesse zeitgesteuert in VBA starten" bedeutet, dass nach Öffnen einer Excel-Datei ein Makro in z.B. 1 Minute weiterläuft, so ist das leicht möglich.
Für das Informationsfenster könnte man doch die Statusleiste verwenden?
Gruß
Günter
Antwort 2 von Tinoka
Wenn das zeitlich anprechen eines Macros so einfach ist, wuerde mir ein Beispiel oder dergl. weiterhelfen.
Das Statusfenster zu benutzen ist eine gute Idee. Leider habe ich noch keine Beispiel im WEB gefunden, dass das Statusfenster im VBA anspricht. Hier waere ein Art Beispiel auch sehr hilfreich.
Gruesse
Tino
Das Statusfenster zu benutzen ist eine gute Idee. Leider habe ich noch keine Beispiel im WEB gefunden, dass das Statusfenster im VBA anspricht. Hier waere ein Art Beispiel auch sehr hilfreich.
Gruesse
Tino
Antwort 3 von Guenter
Hallo Tino,
folgendes Makro ruft ein anderes Makro zeitgesteuert auf:
Ich hoffe, es funktioniert.
Für die Statusbar kann ich morgen mal suchen. Vielleicht finde ich noch was einfaches.
Gruß
Günter
folgendes Makro ruft ein anderes Makro zeitgesteuert auf:
Public Dauer As Date
Sub auto_open()
'(Stunden, Minuten, Sekunden) - aktueller Wert sind 20 Sekunden.
Dauer = TimeSerial(0, 0, 20)
Application.OnTime Now + Dauer, "Makro1", False
End Sub
Ich hoffe, es funktioniert.
Für die Statusbar kann ich morgen mal suchen. Vielleicht finde ich noch was einfaches.
Gruß
Günter
Antwort 4 von Tinoka
Hallo Günter,
besten Dank ich werde es als nächstes gleich mal probieren.
Gruss
Tino
besten Dank ich werde es als nächstes gleich mal probieren.
Gruss
Tino

