remplir combobox sans doublon

18/05/2006, 11h51

Bonjour
Je voudrais remplir une combobox. j'ai les données dans la colonne E de mon fichier mais elle sont répétées plusieurs fois et je voudrais qu'elles n'apparaissent qu'une seule fois dans mon combobox.
Que dois-je rajouter dans mon programme ci-dessous pour qu'elles ne se répètent pas?

Private Sub ComboBox4_Change()
Dim nom As Variant
With Worksheets('EPCI')
nom = .Range('E1:E238')
End With
ComboBox4.List = nom
End Sub

Merci de votre aide

Dull · 18/05/2006, 11h57

Salut Cora, Le Forum,

je te joint deux fichiers trouvés sur ce forum

Inspire t'en

Bon courage [file name=Combodoublons.zip size=21162]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Combodoublons.zip[/file]

18/05/2006, 12h30

Merci Dull pour les fichiers
j'ai réussi à resoudre mon probleme

18/05/2006, 11h51	#1 (permalink)
Cora Guest Messages: n/a	remplir combobox sans doublon Bonjour Je voudrais remplir une combobox. j'ai les données dans la colonne E de mon fichier mais elle sont répétées plusieurs fois et je voudrais qu'elles n'apparaissent qu'une seule fois dans mon combobox. Que dois-je rajouter dans mon programme ci-dessous pour qu'elles ne se répètent pas? Private Sub ComboBox4_Change() Dim nom As Variant With Worksheets('EPCI') nom = .Range('E1:E238') End With ComboBox4.List = nom End Sub Merci de votre aide

18/05/2006, 12h30	#3 (permalink)
Cora Guest Messages: n/a	Re:remplir combobox sans doublon Merci Dull pour les fichiers j'ai réussi à resoudre mon probleme

ANNONCES

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email