Automatisk TAB mellem tekstbokse.

I tekstboksens Change laves dette lille nummer. Sørg blot for at have opsat den rigtige TAB rækkefølge :-)

Private Sub TextBox1_Change()
    If Len(TextBox1) = 2 Then
        SendKeys \"{TAB}\"
    End If
End Sub

Tak, det virker jo bare som det skal.

Rækkefølgen sættes ved hjælp af egenskaben TabIndex.
Hvis der er nogle som skal springes over sættes egenskaben TabStop til FALSE.

Jeg havde fået Tabindex og Tabstop til at virke.

Velbekomme :-)

janvogt>>> Du kan også højreklikke på userformen, og vælge tabuleringsrækkefølge, hvilket nok er lidt hurtigere :-)

Blot lidt information fra nettet, udtalt af en Excel MVP (Microsoft Most Valued Programmer). \"Der er flere programmører, som foretrækker at bruge SetFocus frem for SendKeys i denne situation, fordi man ikke altid kan stole helt på SendKeys.\"

Det vil altså sige, at kodestumpen kan se således ud:
Private Sub TextBox1_Change()
    If Len(TextBox1) = 2 Then
        TextBox2.SetFocus
    End If
End Sub