Textboxen und Buttons in Userform

[Raoul21]

Hallo

ich habe eine Userform mit 4 Textboxen und 2 Commandbuttons und möchte bei Aufruf der UF folgendes tun:

Sofort in eine Textbox schreiben können, dabei

mit Tab durch die Textboxen springen

mit Enter jederzeit den einen Commandbutton betätigen.

Was musss man da einstellen?

LG Raoul

[MisterBurns]

Ahoi!

Code:

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then
         CommandButton1_Click
    End If
End Sub

[Kuwer]

Hallo Raoul.

Sofort in eine Textbox schreiben können, dabei

- Entferne den SetFocus-Code
- Ändere die Aktivierreihenfolge der Teile entsprechend

mit Enter jederzeit den einen Commandbutton betätigen.

Setze die Default-Eigenschaft des entsprechenden Buttons auf True.

Also alles ohne zusätzlichen Code.

Gruß Uwe

[Raoul21]

Funktioniert perfekt. Und so einfach.

Vielen Dank, Uwe.

Und danke auch MisterBurns.

bye