Метод Application.Wait (Excel)

Статья
04/07/2023

Приостанавливает выполняемый макрос до указанного времени. Возвращает значение True, если указанное время наступило.

Синтаксис

выражение.Wait (Time)

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Time	Обязательно	Variant	Время, когда нужно возобновить выполнение макроса (в формате даты Microsoft Excel).

Возвращаемое значение

Boolean

Примечания

Метод Wait приостанавливает все действия Microsoft Excel. Пока действует метод Wait может быть запрещено выполнение других действий на компьютере. Однако фоновые процессы, такие как печать и повторные вычисления, продолжаются.

Пример

В этом примере выполняется макрос до 18:23.

Application.Wait "18:23:00"

В этом примере запущенный макрос приостанавливается примерно на 10 секунд.

newHour = Hour(Now()) 
newMinute = Minute(Now()) 
newSecond = Second(Now()) + 10 
waitTime = TimeSerial(newHour, newMinute, newSecond) 
Application.Wait waitTime

В этом примере отображается сообщение, прошли ли 10 секунд.

If Application.Wait(Now + TimeValue("0:00:10")) Then 
 MsgBox "Time expired" 
End If

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через