Filtre des données dans un combobox [Résolu]

Messages postés
2
Date d'inscription
dimanche 20 avril 2008
Statut
Membre
Dernière intervention
29 mai 2008
- - Dernière réponse : cedricdec
Messages postés
2
Date d'inscription
dimanche 20 avril 2008
Statut
Membre
Dernière intervention
29 mai 2008
- 29 mai 2008 à 13:03
J'ai crée un userform nommé client. Dans celui ci, il y a un combobox1. Pour alimenter le combobox, j'ai écrit les lignes:

 For i = 2 To j
        ComboBox1.AddItem Sheets("clients").Cells(i, 1)
    Next

Donc mon combobox est alimenté.
J'aimerai pouvour filtrer le contenu de ce combo.
J'aimerai que s'affiche la première colonne de la feuille clients en fonction de la valeur qui se trouve dans la 12ème colonne de cette même page.
Le critère de ce filtre se situe dans le textbox12 de ce même userform.

J'ai tapé pour filtrer la ligne

Worksheets("clients").Cells(i, 12).AutoFilter Field:=12, Criteria1:=TextBox12

Le but final est d'afficher le nom des clients en fonction du code postal qui se trouve dans la 12ème colonne
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
15
3
Merci
Soit tu utilises le filtre sur ta feuille avec SpecialCells(xlCellTypeVisible)

soit tu mets une condition dans ta boucle qui vérifie la valeur en colonne L
 For i = 2 To j
    If Sheets("clients").Range("L" & i) = Textbox12.text Then
        ComboBox1.AddItem Sheets("clients").Cells(i, 1)
    End If
 Next

MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 205 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_MPi
Messages postés
2
Date d'inscription
dimanche 20 avril 2008
Statut
Membre
Dernière intervention
29 mai 2008
0
Merci
Super sympa

Ca fonctionne

Merci
Commenter la réponse de cedricdec