Doublon dans combobox

[Titou]

Bonjour,

à partir d'une combobox, je selectionne une feuille cela remplie la liste d'une autre combobox puis à partir de cette combobox cela remplie une autre.... cependant si cette liste comporte des doublons cela me les affiche... alors qu'en passant par la technique additem cela ne prend pas les doublons.

merci d'avance

titou

 

[michel]

bonsoir Titou

pour éviter les doublons dans ton combobox , tu peux utiliser la procedure ci dessous ( à intégrer dans Private Sub UserForm_Activate() de ton fichier )


Dim A As Byte
For A = 4 To Range("C65536").End(xlUp).Row
ComboBox1 = Range("C" & A)
If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Range("C" & A)
Next A


bonne soirée
Michel

 

[Titou]

Salut michel

je te remercie pour ta réponse, je vais essayer de suite

merci @ +

Titou