Discussion :

[zaza78]

Bonjour,

Je voudrais créer une liste déroulante en vba qui me permettrais de choisir plusieurs valeurs dans ma liste.
Je voudrais que l'aspect de la liste soit du même type que celui d'un tableau croisé dynamique, c'est à dire pouvoir séléctionner en cochant les cases des valeurs à afficher.

[Krovax]

Disons que vu le peux d'information c'est difficile de comprendre ce que tu veux exactement. De plus tu ne semble pas avoir commencer. Du coup on part du principe que tu attends gentillement que quelqu'un te fasse ton code parce que ca serait vraiment trop fatiguant de bosser toi même.

Donc mon conseille regarde les FAQ et les tutoriel sur les listbox et les userform (il y a de bonne explication sur les listebox dans ces dernirers). Commence ton code et viens nous voir avec des question sur des points précis.
Quelque chose comme :
j'ai réussi a réaliser ceci (tu donne ton code ou tu explique si c'est utile) j'aimerais ajouter ca (tu explique). J'ai essayer cette méthode (le code) mais ca me fait tel erreur. Tu verra que tu aura des réponses

[zaza78]

Ah désolé pour le manque d'informations

Alors pour m'expliquer,
j'ai crée un fichier qui extrait des informations d'une base de données.
J'ai effectué une mise en forme et en faite j'ai crée un filtre automatique en vba soit le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets(nom_mag).Range("B23:N23").Select
                Selection.AutoFilter

Donc pour cette partie aucun problème.
Mais l'utilisateur voudrait avoir la possibilité de faire un filtre sur la colonne en effectuant des choix multiples. Comme expliqué précédemment.
J'ai cherché mais je n'est pas trouvé.
En même temps je n'attend pas à ce qu'on me donne le code sans rien faire mais juste qu'on me dirige vers quelque chose

Merci pour ta réponse et je vais me diriger vers ce que tu ma donné

[Krovax]

Pour les liste box avec selection mlultiple regarde ce lien il en parle
http://silkyroad.developpez.com/VBA/...serForm/#LII-G
Tu verra également comment les remplir et récupérer les valeur choisie par l'utilisateur, enfin un peu près tout sur les listbox
Et au vu de ton premier message je ne voi pas comment on aurait pu savoir que tu voulais des listbox a choix multiple pour sélectionner les critère d'un filtre.

Pour ton code evite les select
tu lui dit
je selectionne tel zone
j'applique un filtre sur la selection

autant dire j'applique un filtre sur telle zone

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(nom_mag).Range("B23:N23").AutoFilter

(et utilise les balise code, regarde le premier message du forum pour savoir comment)