UserForm ohne Button mit [Esc] schließen

18/03/2010 - 12:59 von Thomas Wiedmann | Report spam
Hallo,

bei einer UserForm, die lediglich ein Textfeld, aber keinen Button enthàlt,
möchte ich erreichen, daß sie mit [Esc] geschlossen wird.

Wie làßt sich dies in VBA 6 (ohne Button) realisieren?

Thomas
 

Lesen sie die antworten

#1 Christian Freßdorf
18/03/2010 - 13:25 | Warnen spam
Hallo Thomas,

das Kreuz zum schließen reicht nicht?

Dann z.B. mit dem KeyUp-Ereignis

Private Sub UserForm_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = BuildKeyCode(wdKeyEsc) Then Unload Me
End Sub



Gruß Christian
~~~~~~~~~~~~
Antworten / Rückmeldungen nur in die NG!
Co-Autor von »Microsoft Word-Programmierung.
Das Handbuch« (MS Press)

Ähnliche fragen