RÉCUPÉRER L'INDEX DES ENTRÉES D'UNE COMBOBOX
LIBRE_MAX
Messages postés
1402
Date d'inscription
mardi 1 mai 2007
Statut
Membre
Dernière intervention
7 octobre 2012
-
25 janv. 2008 à 17:06
cs_goc Messages postés 19 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 21 avril 2011 - 26 janv. 2008 à 06:49
cs_goc Messages postés 19 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 21 avril 2011 - 26 janv. 2008 à 06:49
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/45516-recuperer-l-index-des-entrees-d-une-combobox
https://codes-sources.commentcamarche.net/source/45516-recuperer-l-index-des-entrees-d-une-combobox
26 janv. 2008 à 06:49
il ne faut pas mettre
"For i = 0 To Combo2.ListCount", mais
"For i = 0 To Combo2.ListCount-1", car les index commencent a zero, alors que listcount donne le nombre de lignes, donc si tu veux eviter une erreur en cas texte non trouvé..
25 janv. 2008 à 19:11
pas besoin de poster :)
25 janv. 2008 à 19:10
tu peux directement déposter ton bout de code (snippet) remis en forme sur codyx.org
le sujet est d'ailleurs déjà existant ici :
http://www.codyx.org/snippet_recuperer-position-chaine-dans-combobox-ou-listbox-selectionner_437.aspx
je supprimerai ensuite ta source
bonne soirée
25 janv. 2008 à 17:20
En fait ton code marche avec le Click mais ne marchera pas avec Change()
donc si on a :
Private Sub Combo2_Change() 'ce qui me fallait
Text3.Text = Combo2.List(Combo2.ListIndex) 'renverra une erreur
Mon code donc est utile pour récupérer l'index d'un élément de la combo qu'on a pas cliqué mais changé par une fonction.
25 janv. 2008 à 17:06
et dire que je faisais plus compliqué !
Private Sub Combo2_Click()
Text3.Text = Combo2.List(Combo2.ListIndex)
End Sub