Comment faire un FILTRE avec liste déroulante

F

futurtime

Guest
Hi !
Comment faire un filtre sur une colonne via une liste déroulante à la place de 10 boutons (qui activent chacun une macro genre filtre automatique) ?

En plus précis :
- j'ai 10 colonnes
- le filtre automatique est en place
- sur une colonne (par exemple) j'ai besoin de filtrer les couleurs (jaune, vert, etc...)
- actuellement j'ai 10 boutons (jaune, vert, ...) qui se servent (via macro) du filtre de cette colonne pour me sortir les lignes qui comprennent la couleur choisie.

Comment éviter ses boutons ? pour chaque colonne ?
J'aimerai un menu déroulant qui me propose les couleurs pour cet exemple (ou les éléments inscrits dans la colonne) à la place des 10 boutons.

You see ?
Merci par avance
 
J

jaccard

Guest
Hello
Tu peux créer une ComboBox lié à une plage de cellule contenant tes couleurs en la nommant cboList puis tu saisie la macro suivante :

Private Sub cboList_Change()
Select Case cboList.Value

Case "vert"
'ton code
Case "jaune"
'ton code
'etc...

Case Else

End Select
End Sub

Le fond de l'here effraie...
 
F

FUTURTIME

Guest
Houla !!! Houla !!!
Merci pour la réponse, mais je ne suis pas encore à ce niveau !!!!

Je sais faire des macros, mais uniquement avec "outils-macros-nouvelle macro"
Mais je ne sais pas les "écrire"

Peut-etre un peu plus d'explication ?

Merci

Là, c'est vrai, le fond de l'here M'effraie...
 
J

jaccard

Guest
Hello,

Dans une colonne tu saisie tes valeurs : vert, jaune, etc...

tu selectionnes toutes ces valeurs et tu cliques dans Insertion\Nom\Définir...

dans la boîte de dialogue affichée tu saisis : List

tu cliques Ok

Tu affiches la barre d'outils nommée "Commande" (Affichage\Barres d'outils\Commandes

tu cliques dans "Zone de liste modifiable" (en laissant le curseur de la souris quelques instants sur les icones leurs noms apparaient)

Tu dessines la ComboBox

Tu cliques sur l'icone propriétés (une main index pointé sur une feuille)de la barre d'outils "Commandes"

Tu saisis dans la colonnne de droite en face de Name : cboList
pour ListFillRange : List
pour Style : frmStyleDropDownList

Tu double-clique dans la ComboBox, l'éditeur visual basic s'ouvre et une procédure est écrite que tu modifie comme suit :

Private Sub cboList_Change()
Select Case cboList.Value

Case "vert"
'Le code que tu as généré pour le bouton vert

Case "jaune"
'Idem jaune

'etc...

End Select

End Sub


Tu reviens dans excel, et tu cliques dans l'icone représentant une equerre et un crayon (desactive le mode création)

La ComboBox est opérationel

Il se peut que le code recopié de tes macros enregistrée ne fonctionnent pas, copie deux de celle-ci dans un post pour voir les modifs a faire

Jéhova pas le rapport
 

Discussions similaires

Statistiques des forums

Discussions
312 492
Messages
2 088 899
Membres
103 982
dernier inscrit
krakencolas