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 vote335 views1 answer
Vbnet chart make 0 gridline line different color
VBA
5 votes343 views1 answer
Xl vba double quotes in string literal
VBA
22 votes547 views1 answer
Xl vba check for folder
VBA
5 votes343 views1 answer
Excel vba low byte from INTEGER
VBA
5 votes356 views1 answer
Excel vba second byte from INTEGER
VBA
1 vote318 views1 answer
Vba declare api 64 bit 32 bit
VBA
0 vote342 views1 answer
Vbnet find highest value in chart
VBA
3 votes330 views2 answers
Excel "vba" match last value
VBA
8 votes423 views1 answer
Excel vba make a short integer from two bytes
VBA
2 votes336 views2 answers
Excel vba copy values range to another range
VBA