Combobox alimenté par liste filtrée [Résolu]

Fragnette 22 Messages postés samedi 24 décembre 2016Date d'inscription 30 janvier 2017 Dernière intervention - 7 janv. 2017 à 16:45 - Dernière réponse : Fragnette 22 Messages postés samedi 24 décembre 2016Date d'inscription 30 janvier 2017 Dernière intervention
- 8 janv. 2017 à 15:21
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


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


Afficher la suite 

2 réponses

Répondre au sujet
thev 1691 Messages postés lundi 7 avril 2008Date d'inscription 14 décembre 2017 Dernière intervention - 7 janv. 2017 à 20:45
0
Utile
Bonsoir,

ceci devrait faire l'affaire

http://www.cjoint.com/c/GAhtSGi0FmA
Commenter la réponse de thev
Fragnette 22 Messages postés samedi 24 décembre 2016Date d'inscription 30 janvier 2017 Dernière intervention - 8 janv. 2017 à 15:21
0
Utile
....Et la palme d'or revient à Thev.
Affaire réglée.
Tous mes remerciements.
Commenter la réponse de Fragnette