Bonjour,
J'ai une liste sur un fichier Excel ou j'ai plusieurs fois la même info et je veux que les info se trouvant dans la feuille "@liste" se charge sans doublons.
Petite particularité je ne connais pas le nombre de ligne à l'avance.
le souci que j'ai c'est que je voudrai que l'affiche soit vide, la il y a la dernière entré qui est affiché.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 v_Sheet = "@Liste" For i = 1 To Sheets(v_Sheet).Range("A65536").End(xlUp).Row ComboBox1 = Sheets(v_Sheet).Range("A" & i) If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Sheets(v_Sheet).Range("A" & i) Next i
Merci du coup de main. Car je ne vois pas pourquoi.
Partager