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 vote236 views2 answers
Excel vba password protect
VBA
1 vote222 views1 answer
Excel vba last column in range
VBA
0 vote301 views1 answer
Excel vba delete columns in range
VBA
5 votes244 views1 answer
Excel-vba get integer high byte
VBA
0 vote242 views1 answer
Weekday vba
VBA
0 vote231 views1 answer
Move bindingnavigator vb
VBA
0 vote210 views1 answer
Replace spaces with underscores vbnet
VBA
0 vote231 views1 answer
Excel named range sum
VBA
0 vote231 views1 answer
Visual basic msdos
VBA
0 vote218 views1 answer
Vb.net round to 2 decimal places
VBA