Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Mit Tab-Taste von TextBox zu TextBox springen

Gruppe

TextBox

Problem

Wie kann ich mich in einem Tabellen mit der Tab-Taste von einer TextBox zur anderen bewegen?

Lösung
Den nachfolgenden Code in das Klassenmodul der Tabelle einfügen.

ClassModule: Tabelle1

Private Sub TextBox1_KeyDown(ByVal KeyCode As _
   MSForms.ReturnInteger, ByVal Shift As Integer)
   If KeyCode = vbKeyTab Then TextBox2.Activate
End Sub

Private Sub TextBox2_KeyDown(ByVal KeyCode As _
   MSForms.ReturnInteger, ByVal Shift As Integer)
   If KeyCode = vbKeyTab Then TextBox3.Activate
End Sub

Private Sub TextBox3_KeyDown(ByVal KeyCode As _
   MSForms.ReturnInteger, ByVal Shift As Integer)
   If KeyCode = vbKeyTab Then TextBox1.Activate
End Sub