Как отловить нажатие клавиш ESC или CTRL + BREAK — Visual Basic(Бейсик)

1
2
3
4
5
6
7
8
9
On Error GoTo CancelHandler
Application.EnableCancelKey = xlErrorHandler
  
'Здесь должен быть код Вашей программы.
 
CancelHandler:
Application.EnableCancelKey = xlInterrupt
If Err.Number = 18 Then _
   MsgBox "Вы нажали кнопку ESC или CTRL + BREAK"

Leave a Comment