Application.OnTime nach Ausführung noch aktiv?

Forumthread: Application.OnTime nach Ausführung noch aktiv?

Jogy

Hallo zusammen.
Ist eigentlich Application.OnTime nach der Ausführung weiter aktiv (also wie der Timer in VB) oder wird das nur ein Mal ausgeführt? Mir geht es einfach darum, dass manche Tabellen durchaus auch mal über Nacht offen sein können und es dann etwas ungeschickt wäre, wenn das Makro nach 24h nochmals ausgeführt wird.
Danke und Gruss, Jogy

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Einfach Datum mit angeben

04.08.2009 11:30:47

NoNet

Hallo Jogy,
gib entweder das Datum mit an :
Application.OnTime TimeValue("04.08.2009 11:30:00"), "DeinMakro"
oder terminiere das OnTime-Event wieder :
Application.OnTime TimeValue("11:30:00"), "DeinMakro", Schedule:=False
Gruß, NoNet

AW: Einfach Datum mit angeben

04.08.2009 11:47:13

Jogy

Hi.
Danke für die Antwort... dadurch ist mir aufgefallen, dass ich durch meine übliche Zeitangabe mit Now + ... ja eigentlich gar kein Problem habe - das Datum steckt dann ja drin. Von daher kann ich mir auch die Terminierung sparen, die ich bislang zur Sicherheit drin hatte.
Mich würde es aber trotzdem interessieren, wie sich OnTime hier grundsätzlich verhält.
Gruss, Jogy

AW: Einfach Datum mit angeben

04.08.2009 15:32:00

Jochen

Hi,
der Timer läuft so lange, bis er gestoppt wird oder falls nicht, bis Excel beendet wird.
mfg Jochen

AW: Einfach Datum mit angeben

05.08.2009 11:49:09

Jogy

Danke.
Gruss, Jogy

Infobox / Tutorial

Application.OnTime in Excel VBA effektiv nutzen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Öffne Excel und aktiviere die Entwicklertools:
- Gehe zu "Datei" > "Optionen" > "Menüband anpassen" und aktiviere "Entwicklertools".
Erstelle ein neues Makro:
- Klicke auf "Visual Basic" im Entwicklertools-Tab.
- Füge ein neues Modul hinzu (Rechtsklick auf "VBAProject" > "Einfügen" > "Modul").

Verwende Application.OnTime:

Schreibe den folgenden Code, um ein Makro zu planen:

Sub PlanenMakro()
 Application.OnTime Now + TimeValue("00:01:00"), "DeinMakro"
End Sub

Sub DeinMakro()
 MsgBox "Das Makro wurde ausgeführt!"
End Sub

Dieser Code plant die Ausführung von "DeinMakro" in einer Minute.

Beende Excel oder stoppe den Timer:
- Um den Timer zu stoppen, kannst du den folgenden Befehl verwenden:
```
Application.OnTime Now + TimeValue("00:01:00"), "DeinMakro", Schedule:=False
```

Häufige Fehler und Lösungen

Timer läuft nicht: Stelle sicher, dass du den Timer korrekt mit Application.OnTime gesetzt hast.
Makro wird mehrmals ausgeführt: Verwende den Schedule:=False Parameter, um die Ausführung des ontime event timer zu stoppen.
Fehlermeldung bei Excel-Schließung: Der Timer bleibt aktiv, bis Excel geschlossen wird. Plane daher die Ausführung mit Bedacht.

Alternative Methoden

Verwendung von DoEvents: Du kannst DoEvents verwenden, um den Timer während der Ausführung eines langen Makros regelmäßig zu aktualisieren.
Ereignisgesteuertes Programmieren: Anstelle von Application.OnTime, könntest du auch Ereignisse wie Workbook_Open oder Workbook_SheetChange nutzen, um bestimmte Makros auszulösen.

Praktische Beispiele

Ein einfacher Timer für tägliche Aufgaben:

Sub TäglicherTask()
   Application.OnTime TimeValue("09:00:00"), "DeinMakro"
End Sub

Wiederholtes Ausführen eines Makros alle 30 Minuten:

Sub WiederholendesMakro()
   Application.OnTime Now + TimeValue("00:30:00"), "DeinMakro"
End Sub

Fehlerbehandlung einbauen:

Sub SicheresMakro()
   On Error Resume Next
   Application.OnTime Now + TimeValue("00:01:00"), "DeinMakro"
   If Err.Number <> 0 Then
       MsgBox "Fehler bei der Planung!"
   End If
End Sub

Tipps für Profis

Nutze Application.Ontime Now für eine präzise Zeitplanung.
Halte deine Makros modular, sodass du sie einfach wiederverwenden kannst.
Teste deine Timer in einer geschützten Umgebung, um unerwünschte Ausführungen zu vermeiden.

FAQ: Häufige Fragen

1. Was passiert, wenn ich Excel während der Ausführung eines geplanten Timers schließe?
Der Timer wird gestoppt, aber das geplante Makro wird nicht ausgeführt.

2. Kann ich mehrere Timer gleichzeitig setzen?
Ja, das ist möglich, solange jeder Timer eine eindeutige Zeit und ein eindeutiges Makro hat.

3. Wie kann ich sicherstellen, dass ein Makro nicht mehrmals ausgeführt wird?
Verwende den Schedule:=False Parameter, um den Timer zu stoppen, bevor du ihn neu setzt.

Beliebteste Forumthreads (12 Monate)

Application.OnTime nach Ausführung noch aktiv?

Forumthread: Application.OnTime nach Ausführung noch aktiv?

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Application.OnTime in Excel VBA effektiv nutzen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Application.OnTime nach Ausführung noch aktiv?

Forumthread: Application.OnTime nach Ausführung noch aktiv?

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Application.OnTime in Excel VBA effektiv nutzen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread