ENLEVER LES DOUBLONS D'UNE COMBO OU D'UNE LISTE

Naga - 25 avril 2001 à 10:30
cs_FanLaBise Messages postés 19 Date d'inscription mercredi 12 janvier 2005 Statut Membre Dernière intervention 24 janvier 2011 - 18 déc. 2010 à 18:58
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/988-enlever-les-doublons-d-une-combo-ou-d-une-liste

cs_FanLaBise Messages postés 19 Date d'inscription mercredi 12 janvier 2005 Statut Membre Dernière intervention 24 janvier 2011
18 déc. 2010 à 18:58
Je pense que cette boucle serait un peu mieux...

Private Sub SupDblLstListe()
For i = 0 To LstListe.ListCount - 1
If i < LstListe.ListCount - 1 Then
If LstListe.List(i) = LstListe.List(i + 1) Then
LstListe.RemoveItem (i)
i = i - 1
End If
End If
Next
End Sub
oliv_def Messages postés 14 Date d'inscription mardi 15 mai 2007 Statut Membre Dernière intervention 20 décembre 2007
20 déc. 2007 à 07:32
L exemple avec le combobox c est possible :-) ?
virge54 Messages postés 1 Date d'inscription jeudi 16 mars 2006 Statut Membre Dernière intervention 16 juin 2006
4 avril 2006 à 17:03
Bonjour,
j'ai une erreur àl'execution du type Index du tableau de propriétés incorrect (erreur 381)
qqun a déjà eu ce problème
merci c'est urgent
cs_the touch Messages postés 5 Date d'inscription mercredi 6 juillet 2005 Statut Membre Dernière intervention 30 avril 2007
10 févr. 2006 à 09:26
pas trés efficase mais cune idée
cs_Benz Messages postés 196 Date d'inscription jeudi 3 janvier 2002 Statut Membre Dernière intervention 7 juin 2007
5 févr. 2002 à 09:02
Pour Cumu : si le combo est classé par ordre alphabétique (comme c'est le cas), les doublons devraient forcément se suivre non ?
Bof Bof, seulement pour les doublons qui se suivent
Pas révolutionnaire mais malin et efficace.
Rejoignez-nous