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 vote183 views1 answer
Vba word open document read only
VBA
0 vote187 views1 answer
Dlete rows with blanks and space " " vba
VBA
2 votes174 views2 answers
Excel vba copy values range to another range
VBA
8 votes331 views1 answer
Vba make a short integer from two bytes
VBA
0 vote173 views1 answer
VB get external IP address
VBA
0 vote191 views1 answer
Get month number from month name vbnet
VBA
0 vote163 views1 answer
Vba word pdf table to excel
VBA
0 vote179 views1 answer
How to mount floppy disks in vb.net
VBA
0 vote187 views1 answer
Vba timestamp -- milliseconds
VBA
1 vote170 views1 answer
Excel vba hide zero values
VBA