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 vote247 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
0 vote226 views1 answer
Vba dictionary length
VBA
5 votes248 views1 answer
Vba low word from Long Integer
VBA
0 vote230 views1 answer
Handling a click event anywhere inside a panel vb
VBA
0 vote240 views1 answer
Get current url vb.net
VBA
0 vote240 views2 answers
Excel vba protect cells with formula
VBA
0 vote241 views1 answer
Vbs send keys
VBA
0 vote242 views1 answer
VBA Loop to range
VBA
0 vote228 views2 answers
Excel vba prevent save
VBA
5 votes256 views1 answer
Xl vba double quotes in string literal
VBA