Supprimer les doublons dans une combobox

roule37 Messages postés 11 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 21 janvier 2007 - 20 janv. 2007 à 18:28
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 - 21 janv. 2007 à 17:10
Je voudrais savoir comment faire pour qu'il n'y ait pas de doublons dans ma combobox et qu'il n'y ait qu'une seule fois les propositions dans celle ci.

7 réponses

cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
20 janv. 2007 à 18:44
Plusieurs solutions s'offrent à toi (déjà donné plusieurs fois dans le forum...) (de la plus efficace à la moins efficace je pense) :
- Traîter le mal à sa source : lorsque tu ajoute une ligne à ton combo, tu teste si le texte n'y ai pas déjà
- Ordonner ton combo (propriété sorted à true), et comparer ligne à ligne si 2 lignes consécutives sont identiques, et dans ce cas là, en supprimer une
- Parcourir tout les éléments de ta combo, et pour chaque élément, parcourir tout les autres éléments de ta combo, et les comparer avec le premier élément : si identique, alors supprimé l'un des deux éléments. (la pire méthode je pense).
0
roule37 Messages postés 11 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 21 janvier 2007
20 janv. 2007 à 18:50
"Traîter le mal à sa source : lorsque tu ajoute une ligne à ton combo, tu teste si le texte n'y ai pas déjà"
comment je peux faire ca?
0
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
20 janv. 2007 à 19:46
ben dans la procédure où tu fait ton additem, tu fait une boucle for qui parcoure chaque élément de ton combo, et teste si cet élément est égal à l'élément que tu veux ajouter :

dim bAdd as boolean
For i = 0 to combo1.listcount - 1

if combo1.list(i) = tonItem then

    bAdd = true
    exit for

end if

next i

if not badd then combo1.additem tonItem
0
roule37 Messages postés 11 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 21 janvier 2007
21 janv. 2007 à 14:10
je n'arrive pas a inclure cette procédure et je ne sais pas si il faut que je change les noms de combo1 par exemple.
De plus, je voudrais savoir s'il est possible d'enlever les "FAUX" de ma combobox car elle renvoit a des cellules qui sont des tests.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
21 janv. 2007 à 16:33
Oups, pas fait gaffe que c'était du .net, désolé je pourrais pas t'aider plus, je fait pas de .net !
0
roule37 Messages postés 11 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 21 janvier 2007
21 janv. 2007 à 16:37
nan c du vba excel
0
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
21 janv. 2007 à 17:10
bah ton message n'a rien à faire dans le forum vb.net alors ! je déplace.
0
Rejoignez-nous