Comment afficher le nom d'une colonne filtrée dans une celulle?

The Wolf

XLDnaute Nouveau
Bonjour à tous,
voici mon souci :
J'ai une base de données avec des filtres automatiques pour chaque colonne dans ma feuille1
Je souhaite faire un tableau de requête en feuille2 et voudrais que lorsque l'utilisateur filtre la colonne Client et département par exemple, je retrouve en feuille2 "client" et "département mentionné dans des cellules.
Ci joint, un exemple qui résume mon souci.
Merci beaucoup par avance à ceux qui voudront bien m'aider.
Seb
 

Pièces jointes

  • exemple.xlsx
    10.8 KB · Affichages: 37
  • exemple.xlsx
    10.8 KB · Affichages: 39
  • exemple.xlsx
    10.8 KB · Affichages: 44

Dranreb

XLDnaute Barbatruc
Re : Comment afficher le nom d'une colonne filtrée dans une celulle?

Bonjour.
Cette procédure dans le module Feuil2:
VB:
Private Sub Worksheet_Activate()
Me.[B2:C2].ClearContents
On Error Resume Next
Me.[B2].Value = Mid$(Feuil1.AutoFilter.Filters(1).Criteria1, 2)
Me.[C2].Value = Mid$(Feuil1.AutoFilter.Filters(3).Criteria1, 2)
End Sub
Cordialement.
 

The Wolf

XLDnaute Nouveau
Re : Comment afficher le nom d'une colonne filtrée dans une celulle?

Bonjour,
Merci beaucoup pour votre aide. J'ai copié votre code dans mon fichier joint et ça marche.
Sans abuser de votre disponibilité, pourriez-vous me dire comment faire pour que lorsque je filtre 2 dpt ou plus, la liste des dpt filtrés apparaisse en feuille2?
Merci encore,
Cordialement,
Seb
 

Pièces jointes

  • exemple macro affichage filtres.xlsm
    17.1 KB · Affichages: 37
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
314 950
Messages
2 114 683
Membres
112 213
dernier inscrit
FabienTT