Combobox alimenté par liste filtrée

Résolu
Fragnette Messages postés 22 Statut Membre -  
Fragnette Messages postés 22 Statut Membre -
Bonjour,
Je voudrais afficher dans le combobox1 de l'userform1 les données filtrées de la colonne "C".
D'habitude j'utilise le code
Private Sub ComboBox1_majcombo()
Dim k As Integer
ComboBox1.Clear
lit = Sheets("EFF").Range("C" & Rows.Count).End(xlUp).Row
For k = 6 To lit
Me.ComboBox1.AddItem Sheets("EFF").Range("C" & k)
Next k
On Error GoTo Erreur
Erreur:
ComboBox1.ListIndex = -1
End Sub


mais je me rends compte qu'il m'affiche toute la liste entière , données invisible y compris.
Qui pourrai me l'adapter ou me proposer autre chose?
merci de votre aide

fichier ci-dessous

https://www.cjoint.com/c/GAhpGQXwaOy

2 réponses

  1. Fragnette Messages postés 22 Statut Membre
     
    ....Et la palme d'or revient à Thev.
    Affaire réglée.
    Tous mes remerciements.
    0