Sortie controlée d'une textbox

[Francis]

Bonsoir le forum,


j'ai un code semblable à Franck pour ce traitement, mais 'il ne fonctionne pas'; je suis dans la Textbox1,elle est vide, j'appuye sur 'Enter' et je vais dans la Textox2 au lieu de rester dans la TextBox1. Voici le code

Private Sub TextBox2_Enter()

If KeyCode = 13 Then
If TextBox1.Value = '' Then
TextBox2.BackColor = &HFFFF80
TextBox1.BackColor = &HC0E0FF
TextBox1.SetFocus
Else
TextBox2.BackColor = &HC0E0FF
TextBox1.BackColor = &HC0E080
End If
End If

End Sub

si vous avez une idée , je suis preneur car je sèche...Merci et bonne soirée.

Francis

 

[Benlo27]

Bonjour,

Tu veux atteindre le textbox2 si le textbox1 est vide en pesant sur enter ?

Peut-être mettre le focus sur le textbox2...

 

[Robert]

Bonsoir Francos, Benlo, bonsoir le forum,

Francis, j'ai pas très bien compris exactement ce que tu voulais. Je pense que ce type de code ne s'applique pas à l'événement Enter mais à plutôt à l'événement KeyDown. Essaie la macro comme ça:

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
If TextBox1.Value = '' Then
TextBox2.BackColor = &HFFFF80
TextBox1.BackColor = &HC0E0FF
TextBox1.SetFocus
Else
TextBox2.BackColor = &HC0E0FF
TextBox1.BackColor = &HC0E080
End If
End If
End Sub

 

[myDearFriend!]

Bonsoir Francis, Robert,

Tout à fait d'accord avec Robert pour le choix de la procédure évènementielle à utiliser.
Par contre, si le but est de garder le focus sur TextBox1 si ce dernier est vide et si on appuie sur Entrée, alors, dans le nouveau code présenté, j'échangerais la ligne :

TextBox1.SetFocus

par :

KeyCode = 0

Cordialement,

 

[Francis]

Bonsoir Benlo27, Robert, le foruù

j'ai essayé ton code Robert, mais comme pour le mien, Textbox2 reste bien bleu '&HFFFF80' et Textbox1 reste beige clair '&HC0E0FF' quand Textbox1 est 'vide', quand j'appuye sur 'Enter', mais le focus passe a Textbox2 au lieu de retourner a Textbox1. Grosse Surprise...

Y a t'il un parametre dans les propriétés du control a changer? A priori, je ne pense pas, but why not!!!

Merci pour votre interet et votre aide.

Francis

 

[Francis]

Bonsoir Benlo27, Robert, le foruù

j'ai essayé ton code Robert, mais comme pour le mien, Textbox2 reste bien bleu '&HFFFF80' et Textbox1 reste beige clair '&HC0E0FF' quand Textbox1 est 'vide', quand j'appuye sur 'Enter', mais le focus passe a Textbox2 au lieu de retourner a Textbox1. Grosse Surprise...

Y a t'il un parametre dans les propriétés du control a changer? A priori, je ne pense pas, but why not!!!

Merci pour votre interet et votre aide.

Francis

 

[Fracis]

Bonsoir Didier, Re

Désolé je ne t'avais pas vu.

Mais ton arrivée est fracassante, comme d'habitude. Ca marche impec.

Grand merci Didier et encore merci aussi à Robert.

Bonne soirée.

Francis