logo
Excel и его обьекты

1.4. Свойства Application

Позволяет сделать паузу в выполнении макроса. Пауза может быть нужна для того, чтобы пользователь успел что-то рассмотреть или для того, чтобы на время освободить вычислительные ресурсы системы.

При вызове этого метода указывается время, на которое должно быть приостановлено выполнение макроса. После того, как истекает время, заданное при вызове метода, он возвращает True и выполнение программы продолжается. Например, в листинге. так можно остановить выполнение прораммы на 7 секуд, после чего - вывести сообщение.

If Application.Wait(Now + TimeValue("0:00:7")) Then

MsgBox "Семь секунд прошло!"

End If

Здесь мы получаем значение типа Date с помощью функции TimeValue. После того, как пройдут 7 секунд, выполнение макроса возобновится, метод возвратит True, будет выполнено условие и выведено сообщение.