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 vote303 views1 answer
Excel vba unlock sheet without password
VBA
8 votes344 views1 answer
Vba make integer
VBA
12 votes380 views1 answer
Excel vba write string to text file
VBA
3 votes310 views1 answer
Excel vba get the workbook full filename with path
VBA
0 vote286 views1 answer
Vbnet line chart showing extra space
VBA
1 vote278 views1 answer
Textbox find and replace vb
VBA
5 votes300 views1 answer
Xl vba double quotes in string literal
VBA
5 votes301 views1 answer
Excel vba highlight cells using the hex color value within the cells
VBA
1 vote282 views1 answer
If inputbox cancel vba
VBA
0 vote317 views1 answer
Vbnet revrese the order of character in string
VBA