Ich möchte in einem Makro eine gewisse Wartezeit einbauen (2 Sek). Wie lautet die richtige Synthax?
Danke im vorraus.
Gruss Philipp
Beispiel zur Wait-Methode
In diesem Beispiel wird ein zurzeit ausgeführtes Makro bis 18.23 Uhr desselben Tages unterbrochen.
Application.Wait "18:23:00"
In diesem Beispiel wird ein zurzeit ausgeführtes Makro für ungefähr 10 Sekunden unterbrochen.
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 10
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
In diesem Beispiel wird eine Meldung angezeigt, die anzeigt, dass 10 Sekunden abgelaufen sind.
If Application.Wait(Now + TimeValue("0:00:10")) Then
MsgBox "Time expired"
End If
gruß
andreas e
http://www.skripteundaufgaben.de viel kostenlose downloads zu excel und mehr
Application.Wait Time + TimeSerial(0, 0, 45)
so sollte es gehen, soche Sachen findet man auch in Recherche
gruss geri