XL 2016 combobox via listview

  • Initiateur de la discussion Initiateur de la discussion dereck
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

dereck

XLDnaute Nouveau
Bonjour a tous,
voici mon problème, j'alimente un combobox via une listview que je voudrais sans doublons et je bloque

Private Sub cbbPays_change()
Dim i As Long
RemplissageListView
cbbVille.Clear

For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).ListSubItems(2).Text <> "" Then
cbbVille.AddItem ListView1.ListItems(i).ListSubItems(2).Text
If cbbVille.ListIndex = -1 Then cbbVille.AddItem ListView1.ListItems(i).ListSubItems(2).Text
End If

TrierAlpha cbbVille, True


Next i
cbbSpecif.Clear
End Sub

voici le code ou j'essaie de suprimer les doublons mais cela ne fonctionne pas.

Merci par avance de votre aide
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
8
Affichages
236
Réponses
5
Affichages
190
Réponses
3
Affichages
197
Réponses
9
Affichages
203
Réponses
40
Affichages
3 K
Retour