Інструкція WaitUntil

Переривання виконання програми до вказаного часу.

Синтаксис:

WaitUntil Час

Параметри:

Час: вираз типу Date або Time, що містить дату і час очікування продовження виконання програми.

Коди помилок:

5 Неправильний виклик процедури

Приклад:


        REM Чекати до 18:00, а потім виконати MyMacro.
        REM Якщо більше 18:00 PM, то вийти.
        Sub ExampleWaitUntil
        Dim vTimeschedule As Long
            vTimeSchedule = Date() + TimeValue("18:00:00")
            If vTimeSchedule < Now() Then Exit Sub
            WaitUntil vTimeSchedule
            Call MyMacro
        End Sub
    

Будь ласка, підтримайте нас!