Istruzione WaitUntil

Interrompe l'esecuzione del programma fino all'ora specificata.

Sintassi:

Ora WaitUntil

Parametri:

Ora: un'espressione di data e ora che contiene la data e l'ora di attesa prima che il programma sia eseguito.

Codici di errore:

5 Richiamo di procedura non valido

Esempio:


        REM Wait until 6:00 PM then call MyMacro.
        REM If after 6:00 PM, exit.
        Sub ExampleWaitUntil
        Dim vTimeschedule As Long
            vTimeSchedule = Date() + TimeValue("18:00:00")
            If vTimeSchedule < Now() Then Exit Sub
            WaitUntil vTimeSchedule
            Call MyMacro
        End Sub
    

Sosteneteci!