MyTetra Share
Делитесь знаниями!
Остановка макроса
Ссылка на оригинал
Время создания: 31.07.2019 22:37
Текстовые метки: Остановка макросаCtrl+Break, EnableCancelKey, xlDisabled
Раздел: !Закладки - VBA
Запись: xintrea/mytetra_db_adgaver_new/master/base/1518431471k09bjkoak4/text.html на raw.githubusercontent.com

Dim nextTime

 

Sub Макрос1()

'...

nextTime = Now + #12:10:00 AM#

Application.OnTime nextTime, "Макрос1"

End Sub

 

Sub StopМакрос1()

On Error Resume Next

Application.OnTime nextTime, "Макрос1", , False

End Sub



А чтобы Ctrl+Break не помогал, можете воспользоваться командой
Application.EnableCancelKey = xlDisabled
Так же в этом разделе:
 
MyTetra Share v.0.59
Яндекс индекс цитирования