Excel vba close form escape key

' In the userform code (must also be command controls if any, 
' for example buttons, for Keypress event)
Private Sub UserForm_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If KeyAscii = 27 Then Unload Me
End Sub
' Or on at least one / all buttons:
button.Cancel = True
' Or if none add a button to the userform with:
With button
    .Height = 0
    .Width = 0
    .Cancel = True
End Width

Similar codes

0 vote203 views4 answers
Vgrive,deb
VBA
0 vote166 views1 answer
Vba dictionary length
VBA
0 vote175 views1 answer
Vba word open document read only
VBA
0 vote186 views1 answer
Vba range clear formatting
VBA
1 vote187 views1 answer
Excel vba to lower case
VBA
0 vote174 views1 answer
Limit combobox to list vba
VBA
0 vote165 views1 answer
Vba createparameter null
VBA
0 vote175 views1 answer
Send text to clipboard vb.net
VBA
1 vote170 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
5 votes197 views1 answer
Excel vba last byte from INTEGER
VBA