Сообщение будет показано после одобрения модератором.

Страницы: 1
RSS
Закрыть пользовательскую форму клавишей Esc
 
У меня по клавише Ентер открывается пользовательская форма.
Подскажите, пожалуйста, как можно клавишей Esc закрыть пользовательскую форму Form1. Какой код надо прописать?
 
Код
Private Sub UserForm_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 27 Then Unload Me
End Sub
 
Большое спасибо
 
Если быть до конца откровенным, то данный код не будет работать если фокус находиться не на форме.
Просто каков был вопрос, таков был и ответ
 
Вообще просто необходимо на одну кнопку, очень маленького размера, повесить  на событие clik
Код
Unload Me

и в свойствe cancel прописать true
Изменено: B.Key - 29.12.2015 14:26:11
 
Ок
 
Событие UserForm_KeyPress возникает только в случае, когда на форме нет ни одного контрола, способного получить фокус.
 
B.Key, VBA. UserForm. Как прописать закрытие формы по Esc вне зависимости от фокуса
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
И зачем так далеко ходить? Можно просто #5 прочитать.  :D
Страницы: 1

Сообщение будет показано после одобрения модератором.

Наверх