Comment afficher ou visualiser les conditions de filtrage du filtre automatique dans Excel ?
Le filtre automatique est une fonctionnalité pratique pour les utilisateurs d’Excel. Il arrive que vous l’appliquiez pour filtrer vos données selon plusieurs critères, puis que vous partagiez le fichier avec d’autres personnes. Dans ce cas, comment ces derniers peuvent-ils retrouver les critères de filtrage que vous avez utilisés ?
Afficher / Visualiser le filtre automatique Conditions de filtrage dans la feuille de calcul avec Kutools pour Excel 
Afficher / Visualiser le filtre automatique Conditions de filtrage dans la feuille de calcul à l’aide d’une fonction personnalisée
Supposons que vous disposiez des données suivantes, déjà filtrées selon certains critères (voir capture d’écran) :
Je vais maintenant créer une fonction personnalisée pour afficher les critères de filtrage directement dans des cellules. Voici la marche à suivre :
1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre du module :
Function AutoFilter_Criteria(Rng As Range) As String
'Updateby20140220
Dim str1 As String, str2 As String
Application.Volatile
With Rng.Parent.AutoFilter
With .Filters(Rng.Column - .Range.Column + 1)
If Not .On Then Exit Function
str1 = .Criteria1
If .Operator = xlAnd Then
str2 = " AND " & .Criteria2
ElseIf .Operator = xlOr Then
str2 = " OR " & .Criteria2
End If
End With
End With
AutoFilter_Criteria = UCase(Rng) & ": " & str1 & str2
End Function
3. Ensuite, sauvegardez et fermez ce code. Dans une cellule vide d’une ligne vide, par exemple la cellule A1, saisissez cette formule : =AutoFilter_Criteria(A4) (A4 étant la cellule d’en-tête des données filtrées). Voir capture d’écran :
4. Appuyez ensuite sur la touche Entrée, sélectionnez la cellule A1, puis faites glisser la poignée de recopie vers la cellule située à droite où vous souhaitez appliquer cette formule. Tous les critères s’affichent alors dans les cellules concernées. Voir capture d’écran :
Remarque : si une colonne contient plus de deux critères, cette fonction personnalisée ne produira pas le résultat attendu.
Afficher / Visualiser le filtre automatique Conditions de filtrage dans la feuille de calcul à l’aide d’un code VBA
Voici également un code VBA intéressant qui vous permet d’afficher les conditions de filtrage directement dans une cellule de votre classeur.
1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion>Module, puis collez la macro suivante dans la fenêtre Module:
Code VBA : Afficher le filtre automatique Conditions de filtrage dans la feuille de calcul
Sub ShowAutoFilterCriteria()
'Updateby20140219
Dim xFilter As AutoFilter
Dim TargetFilter As Filter
Dim TargetField As String
Dim xOut As String
Dim OutRng As Range
If ActiveSheet.AutoFilterMode = False Then
Application.StatusBar = False
Exit Sub
End If
xTitleId = "KutoolsforExcel"
Set OutRng = Application.Selection
Set OutRng = Application.InputBox("Cell", xTitleId, OutRng.Address, Type:=8)
Set xFilter = ActiveSheet.AutoFilter
For i = 1 To xFilter.Filters.Count
TargetField = xFilter.Range.Cells(1, i).Value
Set TargetFilter = xFilter.Filters(i)
If TargetFilter.On Then
On Error GoTo OutNext
xOut = xOut & TargetField & TargetFilter.Criteria1
Select Case TargetFilter.Operator
Case xlAnd
xOut = xOut & " And " & TargetField & TargetFilter.Criteria2
Case xlOr
xOut = xOut & " Or " & TargetField & TargetFilter.Criteria2
Case xlBottom10Items
xOut = xOut & " (bottom 10 items)"
Case xlBottom10Percent
xOut = xOut & " (bottom 10%)"
Case xlTop10Items
xOut = xOut & " (top 10 items)"
Case xlTop10Percent
xOut = xOut & " (top 10%)"
End Select
End If
Next
OutRng.Value = xOut
OutNext:
xOut = xOut & TargetField & "= Multiple Filters"
ErrorHandler:
Resume Next
End Sub
3. Appuyez ensuite sur la touche F5 pour exécuter ce code. Une boîte de dialogue s’ouvre alors, vous permettant de sélectionner une cellule vide où insérer les critères. Voir la capture d’écran :
4. Cliquez ensuite sur OK. Tous les critères s’affichent alors dans la cellule sélectionnée, comme suit :
Remarque :
Avec ce code VBA, si votre colonne contient plus de deux critères, ceux-ci ne seront pas affichés en détail, mais apparaîtront comme suit :
Afficher / Visualiser le filtre automatique Conditions de filtrage dans la feuille de calcul avec Kutools pour Excel
Si vous avez Kutools pour Excel installé, vous pouvez utiliser sa fonction Super Filtre pour filtrer vos données et consulter à tout moment les conditions de filtrage.
1. Cliquez sur KUTOOLS PLUS > Super Filtre pour afficher la fonction Super Filtre. Voir la capture d’écran :
2. Dans le volet Super Filtre, cliquez pour sélectionner la plage de données à filtrer, puis cochez la case « Spécifié » afin de verrouiller la plage de filtrage. Voir la capture d’écran :
3. Dans le volet Super Filtre, cliquez sur une ligne d’un groupe de filtres, définissez les conditions de filtrage à l’aide de la liste déroulante selon vos besoins, puis cliquez sur OK pour finaliser la configuration des critères. Voir la capture d’écran :
4. Cliquez sur Filtrer, et les données sélectionnées sont filtrées selon les critères définis. Par ailleurs, vous pouvez constater que les conditions de filtrage s’affichent dans le volet Super Filtre. Voir la capture d’écran :
Remarque : vous pouvez enregistrer vos conditions de filtrage en tant que scénario pour une réutilisation ultérieure grâce à l’utilitaire Super Filtre.
1. Cliquez sur le bouton Enregistrer le scénario actuel, puis saisissez un nom de filtre dans la boîte de dialogue qui s’ouvre.
2. Lorsque vous souhaitez réutiliser ces paramètres de filtre, cliquez sur le bouton de menu, puis sélectionnez le scénario dans le sous-menu de Charger un scénario existant.
Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant
Démo : Afficher les Conditions de filtrage pendant le filtrage à l’aide de Kutools pour Excel
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels