TextBoxen in einer UserForm reaktivieren

[excl50]

Hallo Zusammen,

ich habe unter Private Sub UserForm_Initialize() alle TextBoxen, mit Außnahme der Obersten auf TextBox.Enabled = False gesetzt.

Nun soll wenn die Tabulatortaste gedrückt wird die nächste TextBox reaktiviert werden und der Cursor in diese wechseln.
Die vorherige TextBox soll dafür deaktiviert werden, wobei der Inhalt nicht gelöscht werden soll.

Dafür habe ich fogenden Code:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)


    If KeyAscii = 9 Then
        Me.TextBox2.Enabled = True
        Me.TextBox2.SetFocus
        Me.TextBox1.Enabled = False
    End If

End Sub

Aber so funktioniert das leider nicht, hat jemand eine Idee?

Danke im Voraus!

[Storax]

Benutze das KeyDown Event

[MisterBurns]

Magst du mal erklären, was der Sinn dahinter ist? Mir fällt nämlich kein Grund ein, warum man sich das antun sollte. Soweit ich weiß, kann man gleichzeitig nur in einem Textfeld schreiben.