Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

obliger saisie de 3 textbox dans l'ordre

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

GHISLAIN

XLDnaute Impliqué
bonjour et bonnes fetes a tous,

je cherche a controler la saisie de 3 textbox dans l ordre

premierement obliger de saisir le textbox1

passer ensuite a au second textbox2 et message saisir le textbox2 (si la 1 pas saisie message d erreur et retour a la textbox1)

passer ensuite au textbox3 (si la 1 ou 2 pas saisie message d erreur et retour a la textbox1 ou 2)


merci a tous

amicalement

ghislain
 
Re : obliger saisie de 3 textbox dans l'ordre

Bonjour
Jouez plutôt sur les propriétés Enabled: seule celle de Textbox1 à True d'abord puis à son _Change celle du 2 etc.
Voir si des ComboBox ne seraient pas plus sympas (si faisable évidemment)
Cordialement.
 
Re : obliger saisie de 3 textbox dans l'ordre

Bonjour Dranreb,

merci d etre passé sur mon fil

je recherche a a avoir un controle avec message , je suposse qu il faut utiliser for et next , mais ça depasse mes conpetences


for i= 1to3

msg= "saisir le textbox1"
if textbox1="" then
msg= "saisir le textbox1"
end if
next i
msg= "saisir le textbox2"
if textbox2="" then
msg= "saisir le textbox2"
end if
next i
msg= "saisir le textbox3"
if textbox3="" then
msg= "saisir le textbox3"
end if

merci


"
 
Re : obliger saisie de 3 textbox dans l'ordre

Bonjour,

Essaye ce code :

Private Sub TextBox2_Enter()
If TextBox1.Value = "" Then
MsgBox ("Veuillez rentrer un texte dans la première textbox")
TextBox1.SetFocus
End If
End Sub
Private Sub TextBox3_Enter()
If TextBox2.Text = "" Or TextBox1.Text = "" Then
MsgBox ("Veuillez d'abord entrer les données dans les autres textbox")
TextBox1.SetFocus
End If
End Sub​

Bien sur il faudra l'améliorer
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2021 Erreur 424
Réponses
14
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…