Закрыть UserForm автоматически через определенное время

Сергей Беляев Пользователь Сообщений: 434 Регистрация: 24.06.2015	#1 10.11.2015 01:57:28 Доброго времени суток! Не могу сообразить как закрыть форму через время. Надо чтобы, открылась форма, повисела n секунд и закрылась. Изменено: Сергей Беляев - 10.11.2015 01:57:54

Игорь

Пользователь

Сообщений: 3695 Регистрация: 23.12.2012

10.11.2015 02:16:21

Не поленился вбить название вашей темы в яндекс
В первом же результате поиска, первое сообщение, - с готовым кодом под ваш случай:

Код

' модуль формы. форма должна быть НЕМОДАЛЬНАЯ
Private Sub UserForm_Activate()
    Application.OnTime Now + TimeValue("00:00:10"), "KillTheForm"
End Sub

' в стандартный модуль
Sub KillTheForm()
    Unload UserForm1
End Sub

Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Читают тему