Remplissage correcte de combobox

Bonjour tout le monde,

J'ai un problème au niveau du remplissage de certaines combobox. En l'occurrence la combobox "Cable".

Ma combobox se remplit bien, mais je ne parviens pas à limiter aux données que je veux en un seul exemplaire.

Si vous avez des suggestions ou des bons tuyaux, je suis preneur.

Cordialement.

PS : si vous avez des suggestions pour simplifier ce que j'ai fait, je suis preneur aussi:lol:

Bonjour

Déjà, explique nous de quelle manière tu remplis tes combobox. Code à l'appui. D'où viennent tes données.

Starec

Le code est le suivant

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Cable_Click() Cable.Clear Cable.AddItem "Conducteurs et câbles multiconducteurs", 0 Cable.AddItem "Câbles multiconducteurs", 1 Cable.AddItem "Câbles monoconducteurs", 2   While Cable.ListIndex = 2 Or Cable.ListIndex = 1 Or Cable.ListIndex = 0 Cable.RemoveItem 3 Wend   End Sub

---

J'(ai essayé de télécharger le fichier, mais il n'y a pas moyen:oops:

C'est, bon, je crois je j'ai trouvé la cause et comment y remédier.

Citation:

---

Envoyé par Shadow5

C'est, bon, je crois je j'ai trouvé la cause et comment y remédier.

---

Tant mieux, mais ce serait bien de faire partager les autres membres de la résolution de ton problème, au cas où ils auraient le même soucis.

Starec

:oops: au début, je pensais que ce code pouvait fonctionner. Mais je me suis rendu compte que lorsque je faisais :

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Cable_Click()   if Cable.listIndex=-1 then Cable.AddItem "Conducteurs et câbles multiconducteurs", 0 Cable.AddItem "Câbles multiconducteurs", 1 Cable.AddItem "Câbles monoconducteurs", 2 End If   End Sub

---

Je gardais aussi des erreurs.

C'est pourquoi je suis en train de comprendre le modèle de Shyroad. pour un remplissage correct quelque soit la situation.