Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Textbox mit Enter

Betrifft: Textbox mit Enter von: Stefan Glander
Geschrieben am: 22.11.2014 17:06:33

Hallo Forum,

ich stehe gerade auf dem Schlauch.
Habe ein Code den ich über eine UF mit einem Commandbutton ausführe.
Nun möchte ich zusätzlich noch erreichen das ich den Code mit drücken der Entertaste nach Eingabe des Textes in Textbox1 ausgeführt wird.

Private Sub TextBox1_Change()
   If TextBox1 = PASS_WORD Then
        ActiveWorkbook.Worksheets("Tabelle3").Visible = True
        Unload UserForm1
   Else
    ActiveWorkbook.Worksheets("Tabelle3").Visible = False
    Unload UserForm1
   End If
End Sub
wie baue ich nun die Enterfunktion in den Code ein?

Gruß
Stefan

  

Betrifft: AW: Textbox mit Enter von: Hajo_Zi
Geschrieben am: 22.11.2014 17:10:15

Hallo Stefan,

benutze AfterUpdate oder das Exit Ereignis.

GrußformelHomepage


  

Betrifft: AW: Stehe nicht mehr auf dem Schlauch. Danke Hajo von: Stefan Glander
Geschrieben am: 22.11.2014 17:19:22

.


 

Beiträge aus den Excel-Beispielen zum Thema "Textbox mit Enter"