O
olic95
Guest
Bonjour le forum,
J'essaie en vain d'utiliser vbTab afin de passer automatiquement d'une textbox1 à une textbox2 lorsque la longueur de la chaine saisie dans texbox1 est égale à 2
Private Sub TextBox_MOIS_Change()
' teste la longueur de la valeur saisie (2 caractères maxi)
If (Len(Toutes_quittances.TextBox_MOIS.Value) = 2) Then
Toutes_quittances.TextBox_ANNEE.Value = Toutes_quittances.TextBox_ANNEE.Value & vbTab
End If
End Sub
C'est mon code actuel, et ça ne fonctionne pas.
J'ai essayé aussi
If... then
vbTab
end if
mais rien à faire non plus.
La première solution ajoute des espaces à la fin du texte et la seconde plante lamentablement !
Alors comment utiliser ce vbTab pour "sauter" à la textbox suivante (j'ai bien mis les textbox dans l'ordre souhaité sur le userform)
Merci.
Olivier.
J'essaie en vain d'utiliser vbTab afin de passer automatiquement d'une textbox1 à une textbox2 lorsque la longueur de la chaine saisie dans texbox1 est égale à 2
Private Sub TextBox_MOIS_Change()
' teste la longueur de la valeur saisie (2 caractères maxi)
If (Len(Toutes_quittances.TextBox_MOIS.Value) = 2) Then
Toutes_quittances.TextBox_ANNEE.Value = Toutes_quittances.TextBox_ANNEE.Value & vbTab
End If
End Sub
C'est mon code actuel, et ça ne fonctionne pas.
J'ai essayé aussi
If... then
vbTab
end if
mais rien à faire non plus.
La première solution ajoute des espaces à la fin du texte et la seconde plante lamentablement !
Alors comment utiliser ce vbTab pour "sauter" à la textbox suivante (j'ai bien mis les textbox dans l'ordre souhaité sur le userform)
Merci.
Olivier.