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 vote172 views1 answer
Vba character ascii code
VBA
1 vote158 views1 answer
Vba reverse string
VBA
0 vote158 views1 answer
Excel vba disable copy paste
VBA
5 votes178 views1 answer
Excel vba low byte from INTEGER
VBA
1 vote177 views1 answer
How to remove zeros in excel
VBA
0 vote171 views1 answer
Excel vba protect worksheet without password
VBA
0 vote178 views1 answer
Visual stuiod not recognising desgined labels
VBA
0 vote175 views1 answer
Vbs run with cscript
VBA
0 vote163 views1 answer
Vba file chooser
VBA
3 votes156 views1 answer
Vba not equal
VBA