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 vote140 views1 answer
Vbscript check if string is empty
VBA
0 vote148 views1 answer
Dynamically change drop down list visual basic
VBA
1 vote135 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote185 views2 answers
VB
VBA
6 votes153 views1 answer
Excel vba get the path of current workbook
VBA
4 votes141 views1 answer
Excel vba how to reset usedrange
VBA
1 vote144 views1 answer
Excel vba force recalculation
VBA
1 vote149 views1 answer
Excel vba last row of range
VBA
0 vote136 views1 answer
Excel vba chrw max value
VBA
0 vote137 views1 answer
Vbs
VBA