RECHERCHE INCRÉMENTABLE DANS UNE COMBOBOX

Signaler
Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015
-
Messages postés
4
Date d'inscription
samedi 2 août 2003
Statut
Membre
Dernière intervention
20 juin 2004
-
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/3891-recherche-incrementable-dans-une-combobox

Messages postés
4
Date d'inscription
samedi 2 août 2003
Statut
Membre
Dernière intervention
20 juin 2004

ON PEUT AMELIORER LE CODE EN AJOUTANT
.TopIndex = i

pour mettre la première occurence en relief comme ça s'il y a plusieurs occurenceS on pourait choisir.

' recherche de la correspondance
For i = 0 To .ListCount - 1
If UCase(NoSelectText) = UCase(Mid(CITY.List(i), 1, Len(NoSelectText))) Then
.ListIndex = i
.TopIndex = i
Exit For
End If
Next
Messages postés
4
Date d'inscription
samedi 2 août 2003
Statut
Membre
Dernière intervention
20 juin 2004

MERCI C'EST VRAIMENET FACIL ET GENIAL
J4AI EXPERIMENTE DAUTRE CODE MAIS C' EST LE MEILLEUR ET LE PLUS SIMPLE!
Messages postés
1
Date d'inscription
vendredi 3 décembre 2004
Statut
Membre
Dernière intervention
19 septembre 2006

Ca marche très bien, commenté comme il faut. Un exemple à suivre! Bravo. Et merci aussi.
Messages postés
1
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
14 novembre 2003

Ce que j'aime dans un code, c'est quand il est propre, commenté et très UTILE donc je mets 10 / 10.

Merci à toi FredJust !
Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015

Appareemnt ta oublié la maj, ca donne :
Http://fred.just.free.fr/francais/exemples/comboboxsearch.html
:]