Gruppe
Dialog
Bereich
TextBox
Thema
Mit Tab-Taste von TextBox zu TextBox springen
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