Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

UserForm mit Enter beenden

Forumthread: UserForm mit Enter beenden

UserForm mit Enter beenden
21.01.2004 17:18:57
Elmar Steigenberger
Hallo Ihr lieben Helfer und Helferinnen,
Wie kann ich eine Userform mit Enter beenden?
Der Commandbutton heißt CB_Fertig

Private Sub CB_Fertig_Click()
Unload Me
End Sub

Wie bekomme ich Excel dazu, dass es mir die Schaltfläche hervorhebt?
Vielen Dank fürs Lesen und Antworten
liebe e-Grüße Elmar
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UserForm mit Enter beenden
21.01.2004 17:43:06
Gerd
Default des Button auf True stellen.
Gerd
Vielen Dank! Hat einwandfrei funktioniert! oT
21.01.2004 22:18:39
Elmar Steigenberger
.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

UserForm mit Enter beenden in Excel VBA


Schritt-für-Schritt-Anleitung

Um eine UserForm in Excel VBA mit der Enter-Taste zu beenden, folge diesen Schritten:

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu starten.

  2. Erstelle eine UserForm: Klicke auf „Einfügen“ und wähle „UserForm“.

  3. Füge einen CommandButton hinzu: Ziehe einen Button auf die UserForm. Nenne ihn CB_Fertig.

  4. Füge den Code hinzu: Doppelklicke auf den CommandButton, um das Code-Fenster zu öffnen, und füge den folgenden Code ein:

    Private Sub CB_Fertig_Click()
       Unload Me
    End Sub
  5. Setze den Default-Wert des Buttons: Stelle sicher, dass der Button als Default gesetzt ist, indem du den Default-Eigenschaft des Buttons auf True setzt. Dies kannst du im Eigenschaftenfenster tun.

  6. Testen: Starte die UserForm und drücke die Enter-Taste, um die Form zu schließen.


Häufige Fehler und Lösungen

  • Fehler: Die UserForm schließt sich nicht mit Enter.

    • Lösung: Überprüfe, ob der Default-Wert des CommandButtons richtig gesetzt ist. Wenn er auf True steht, sollte die Enter-Taste die Schaltfläche aktivieren.
  • Fehler: Der CommandButton wird nicht hervorgehoben.

    • Lösung: Stelle sicher, dass die UserForm den Fokus hat. Du kannst auch den SetFocus-Befehl verwenden, um sicherzustellen, dass der Button hervorgehoben wird.

Alternative Methoden

Falls du die UserForm auf andere Weise schließen möchtest, kannst du folgende Methoden verwenden:

  • Schließen über ESC-Taste: Du kannst das Schließen der UserForm auch an die ESC-Taste binden, indem du den folgenden Code in das UserForm-Codefenster einfügst:

    Private Sub UserForm_KeyDown(KeyCode As MSForms.ReturnInteger, Shift As Integer)
       If KeyCode = vbKeyEscape Then
           Unload Me
       End If
    End Sub
  • Verwendung von anderen Steuerelementen: Du kannst auch andere Steuerelemente hinzufügen, die das Schließen der UserForm ermöglichen, z.B. ein Label oder ein Bild.


Praktische Beispiele

Hier ist ein einfaches Beispiel, um die UserForm mit einem Button und der Enter-Taste zu schließen:

  1. Erstelle eine UserForm mit einem Textfeld und einem CommandButton.
  2. Füge den folgenden Code hinzu:

    Private Sub CB_Fertig_Click()
       Unload Me
    End Sub
    
    Private Sub UserForm_KeyDown(KeyCode As MSForms.ReturnInteger, Shift As Integer)
       If KeyCode = vbKeyReturn Then
           Unload Me
       End If
    End Sub

In diesem Beispiel wird die UserForm sowohl durch Klicken auf den Button als auch durch Drücken der Enter-Taste geschlossen.


Tipps für Profis

  • Verwende mehrere Steuerelemente: Nutze verschiedene Steuerelemente in deiner UserForm, um die Benutzerinteraktion zu verbessern.
  • Design und Benutzerfreundlichkeit: Achte darauf, dass die UserForm ansprechend und benutzerfreundlich gestaltet ist. Verwende klare Bezeichnungen für Schaltflächen.
  • Fehlerbehandlung: Implementiere Fehlerbehandlungen im Code, um mögliche Laufzeitfehler zu vermeiden.

FAQ: Häufige Fragen

1. Warum funktioniert die Enter-Taste nicht? Überprüfe, ob der Button korrekt als Default gesetzt ist und ob die UserForm den Fokus hat.

2. Kann ich andere Tasten zum Schließen der UserForm verwenden? Ja, du kannst beliebige Tasten verwenden, indem du die KeyDown-Ereignisprozedur anpasst und die entsprechenden KeyCodes abfragst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige