VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: 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