Bonjour à toutes et tous,
J'ai plusieurs textbox ds mon Usf, mais quand le focus est ds la deuxième, et uniquement ds celle-là, mon Usf se décale sur la droite, comme ci j'avais ScrollLeft=66 alors qu'il n'en est rien. Voilà ce que j'ai:
Private Sub textbox1_keydown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If (KeyCode = 108 Or KeyCode = 13) Then Userform1.TextBox2.SetFocus
End sub
Private Sub textbox2_gotfocus()
Textbox2.value = "Eric2"
Userform1.ScrollLeft = 0
End Sub
Donc en Textbox1 quand j'appuye sur 'Entrée' ou retour chariot, je devrais avoir le Textbox2
qui Gotfocus. Et bien non, mon Usf se décale et Textbox2.value = ""
Pouriez-vous m'explquer pourquoi?
Merci pour votre aide.
Eric D
J'ai plusieurs textbox ds mon Usf, mais quand le focus est ds la deuxième, et uniquement ds celle-là, mon Usf se décale sur la droite, comme ci j'avais ScrollLeft=66 alors qu'il n'en est rien. Voilà ce que j'ai:
Private Sub textbox1_keydown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If (KeyCode = 108 Or KeyCode = 13) Then Userform1.TextBox2.SetFocus
End sub
Private Sub textbox2_gotfocus()
Textbox2.value = "Eric2"
Userform1.ScrollLeft = 0
End Sub
Donc en Textbox1 quand j'appuye sur 'Entrée' ou retour chariot, je devrais avoir le Textbox2
qui Gotfocus. Et bien non, mon Usf se décale et Textbox2.value = ""
Pouriez-vous m'explquer pourquoi?
Merci pour votre aide.
Eric D