Expressi贸 WaitUntil

Interromp l'execuci贸 del programa fins a l'horari especificat.

Sintaxi:

WaitUntil Temps

Par脿metres:

Temps: una expressi贸 de data/hora que cont茅 la data i l'hora d'espera abans que s'executi el programa.

Codis d'error

5 La crida al procediment no 茅s v脿lida

Exemple:


        REM Espera fins a les 18.00 i despr茅s invoca LaMevaMacro.
        REM Si ocorre despr茅s de les 18.00, finalitza.
        Sub ExampleWaitUntil
        Dim vTimeschedule As Double
            vTimeSchedule = Date() + TimeValue("18:00:00")
            If vTimeSchedule < Now() Then Exit Sub
            WaitUntil vTimeSchedule
            Call MyMacro
        End Sub
    

Ens cal la vostra ajuda!