Выполнение процедуры с задержкой - VBA
Формулировка задачи:
Ребята! Возник вопрос! Есть процедура которую нужно выполнить (Excel VBA), но эта процедура должна выполняться с задержкой в секунд , после того как ее вызвали! Не могли бы Вы помочь с кодом! Заранее Спасибо.
P.S. Только не макрос!
Решение задачи: «Выполнение процедуры с задержкой»
textual
Листинг программы
- Sub MySub()
- Static startTime
- If startTime = 0 Then 'выполнение не запланировано, запланировать
- startTime = Now + #12:00:10 AM# '10 секунд, вводить #0:0:10#
- Application.OnTime startTime, "MySub"
- Exit Sub
- ElseIf Now < startTime Then 'выполнение запланировано, выход
- Exit Sub
- End If
- startTime = 0 'сбросить время, выполнить запланированную процедуру
- 'начало процедуры
- MsgBox "А вот и я!"
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
