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

1 vote211 views2 answers
Get all column names from excel vba
VBA
0 vote215 views1 answer
Add items to combobox vb.net
VBA
0 vote296 views1 answer
Find control with name vb
VBA
0 vote296 views1 answer
Excel vba add reference programmatically
VBA
0 vote220 views1 answer
Vbs send keys
VBA
1 vote215 views1 answer
Vba delete array element
VBA
8 votes318 views1 answer
Excel vba determine number of elements in a 2D array
VBA
11 votes497 views1 answer
Excel vba How to URL encode a string
VBA
-1 vote216 views1 answer
For i in range vba
VBA
0 vote238 views1 answer
Label de tableau dans des label.text en VBA
VBA