Filtre des données dans un comboboxRésolu

Question

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

cs_MPi · Accepted Answer

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

cedricdec · Answer

Super sympa 

Ca fonctionne 

Merci

Filtre des données dans un combobox

2 réponses

Votre réponse