Tout en travaillant avec Microsoft Excel le filtrage des données nous permet de ne voir que les informations qui nous intéressent. Cette technique s'avère très utile lorsque nous voulons nous concentrer sur certains éléments d'un grand ensemble de données ou de tableaux. Une fois le travail terminé, nous avons besoin de récupérer ces données dans notre feuille de calcul. Bien que Excel dispose déjà d'un outil intégré pour cela, mais VBA est le moyen le plus efficace, le plus rapide et le plus sûr d'effectuer n'importe quelle tâche dans Excel. Dans cet article, nous allons donner quelques exemples pour supprimer le filtre dans Excel VBA.

Télécharger le cahier d'exercices

Vous pouvez télécharger le cahier d'exercices et vous entraîner avec eux.

5 méthodes simples pour supprimer un filtre dans Excel VBA

Excel dispose d'outils et de fonctions intégrés permettant d'éliminer les filtres des données. Excel VBA nous pouvons rapidement supprimer ces filtres en exécutant simplement la commande VBA Pour supprimer les filtres des données, nous allons utiliser le jeu de données suivant, qui contient des identifiants de produits dans la colonne B les noms des produits dans la colonne C et le pays de livraison dans la colonne D . comme nous voulons voir seulement les détails du produit Shampooing et Conditionneur Nous les avons donc filtrées. Maintenant, supposons que nous ayons besoin d'effacer ces données filtrées. Nous utiliserons des filtres de type Macros Excel VBA Démontrons les exemples pour effacer ces filtres des données en utilisant Excel VBA .

1. appliquer VBA pour supprimer tous les filtres d'un tableau Excel

Avec Excel VBA les utilisateurs peuvent facilement utiliser le code qui agit comme des menus Excel à partir du ruban. Pour utiliser l'option VBA pour supprimer tous les filtres du tableau Excel, suivons les étapes ci-dessous.

ÉTAPES :

• Tout d'abord, rendez-vous sur le site Développeur dans le ruban.
• Deuxièmement, du Code cliquez sur Visual Basic pour ouvrir le Éditeur Visual Basic ou appuyez sur Alt + F11 pour ouvrir le Éditeur Visual Basic .

• Au lieu de faire cela, vous pouvez simplement faire un clic droit sur votre feuille de calcul et aller à Afficher le code Cela vous amènera également à Éditeur Visual Basic .

• Cela apparaîtra dans le Éditeur Visual Basic où nous écrivons nos codes pour créer un tableau à partir d'une gamme.
• Troisièmement, cliquez sur Module de la Insérer dans la barre de menu déroulant.

• Cela créera un Module dans votre cahier d'exercices.
• Et, copiez et collez le VBA montré ci-dessous.

Code VBA :

 Sub Remove_Filters1() Dim lstObj As ListObject Set lstObj = Sheet1.ListObjects(1) lstObj.AutoFilter.ShowAllData End Sub 

• Après cela, exécutez le code en cliquant sur l'icône RubSub ou en appuyant sur le raccourci clavier F5 .

• Enfin, en suivant ces étapes, vous supprimerez tous les filtres du tableau Excel de votre feuille de calcul.

Explication du code VBA

 Sub Remove_Filters1() 

Sous est une partie du code qui est utilisée pour gérer le travail dans le code mais qui ne renvoie aucune valeur. Elle est également connue sous le nom de sous-procédure. Nous nommons donc notre procédure Supprimer_Filtres1() .

 Dim lstObj As ListObject 

Déclaration des variables.

 Set lstObj = Sheet1.ListObjects(1) 

VBA Set nous permet simplement d'éviter d'avoir à taper à plusieurs reprises la plage que nous devons sélectionner lors de l'exécution du code. Nous définissons donc la référence au premier tableau de la feuille.

 lstObj.AutoFilter.ShowAllData 

Cette ligne de code va supprimer tous les filtres pour l'ensemble des données.

 End Sub 

Cela mettra fin à la procédure.

Lire la suite : Comment supprimer un filtre dans Excel (5 façons simples et rapides)

2. effacer tous les filtres de tableau Excel sur une feuille en utilisant VBA

Examinons un autre exemple d'utilisation d'Excel VBA pour supprimer tous les filtres de tableau Excel sur une feuille. Pour cela, suivez les étapes ci-dessous.

ÉTAPES :

• Tout d'abord, allez sur le site Développez r dans le ruban.
• Ensuite, cliquez sur Visual Basic pour ouvrir le Éditeur Visual Basic .
• Une autre façon d'ouvrir le Éditeur Visual Basic consiste simplement à appuyer sur Alt + F11 .
• Ou bien, cliquez avec le bouton droit de la souris sur la feuille, puis sélectionnez Afficher le code .
• Ensuite, allez sur Insérer et sélectionnez Module dans le menu déroulant.
• Et, cela va ouvrir la fenêtre de Visual Basic.
• Après cela, copiez et collez le Code VBA ci-dessous.

Code VBA :

 Sub Remove_Filters2() Dim lstObj As ListObject For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj End Sub 

• En outre, appuyez sur la touche Touche F5 ou cliquez sur le Run Sub pour exécuter le code.

• Et, ce code effacera tous les filtres de table d'excel de votre feuille et donnera la sortie comme Méthode 1 .

Explication du code VBA

 For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj 

Ces lignes de code parcourent en boucle toutes les tables de la feuille et suppriment tous les filtres pour l'ensemble de la feuille de calcul.

Lire la suite : Comment filtrer le tableau croisé dynamique d'Excel (8 façons efficaces)

3. supprimer le filtre d'une colonne avec VBA dans Excel

Voyons une autre façon de supprimer le filtre d'une colonne avec Excel VBA, en suivant la procédure.

ÉTAPES :

• Pour commencer, cliquez sur le Développeur dans le ruban.
• Deuxièmement, lancez le Éditeur Visual Basic en cliquant sur Visual Basic .
• Vous pouvez également accéder au Éditeur Visual Basic en appuyant sur Alt + F11 .
• Ou, Cliquez à droite sur sur la feuille et choisissez Afficher le code dans le menu.
• Ensuite, choisissez le Module dans le menu déroulant sous Insérer .
• Et la fenêtre Visual Basic apparaîtra.
• Écrivez le code à cet endroit.

Code VBA :

 Sub Remove_Filter3() Sheet1.Range("B3:D16").AutoFilter Field:=4 End Sub 

• Enfin, appuyez sur la touche Touche F5 pour exécuter le code.

• L'utilisation de ce code supprimera le filtre d'une colonne de votre tableau Excel.

Explication du code VBA

 Sheet1.Range("B3:D16").AutoFilter Field:=4 

Cette ligne de code spécifie uniquement le numéro de champ et aucun autre paramètre.

Lire la suite : Excel VBA pour filtrer dans une même colonne par plusieurs critères (6 exemples)

Lectures similaires

• Excel VBA : Comment filtrer avec plusieurs critères dans un tableau (7 façons)
• Code VBA pour filtrer les données par date dans Excel (4 exemples)
• Comment utiliser un filtre dans une feuille Excel protégée (avec des étapes faciles)
• Filtrer une colonne différente par plusieurs critères dans Excel VBA
• Code VBA pour filtrer les données dans Excel (8 exemples)

4. effacer tous les filtres d'une feuille de calcul active

Maintenant, regardez un autre Excel VBA pour effacer tous les filtres d'une feuille de calcul active. Suivons les étapes.

ÉTAPES :

• Pour commencer, ouvrez le ruban et sélectionnez l'onglet Développeur option.
• Ensuite, pour accéder au Éditeur Visual Basic cliquez sur Visual Basic .
• Presser Alt + F11 fera également apparaître le Éditeur Visual Basic .
• Alternativement, Cliquez à droite sur la feuille et choisissez Afficher le code dans le menu qui apparaît.
• Maintenant, de la Insérer dans le menu déroulant, choisissez Module .
• Ensuite, copiez et collez le VBA qui suit.

Code VBA :

 Public Sub RemoveFilter() If ActiveSheet.FilterMode = True Then ActiveSheet.ShowAllData End If End Sub 

• Exécutez le code en appuyant sur la touche F5 clé.

• Enfin, vous pourrez supprimer les filtres de vos données à l'aide de la méthode suivante VBA code comme Méthode 1 .

Lire la suite : Comment filtrer par liste dans une autre feuille en Excel (2 méthodes)

5) Excel VBA pour supprimer tous les filtres d'un classeur

Explorons une autre r Excel VBA pour supprimer tous les filtres d'un classeur. Voyons donc les étapes à suivre.

ÉTAPES :

• Pour commencer, ouvrez le ruban et choisissez Développeur dans le menu déroulant.
• Sélectionnez ensuite Visual Basic pour ouvrir le Éditeur Visual Basic .
• Le site Éditeur Visual Basic On peut également y accéder en appuyant sur Alt + F11 .
• Vous pouvez également Cliquez à droite sur la feuille et sélectionnez Afficher le code dans le menu contextuel.
• Après cela, sélectionnez Module de la Insérer dans le menu déroulant.
• Ensuite, copiez et collez le code VBA suivant.

Code VBA :

 Sub Remove_Filters_From_Workbook() Dim shtnam As Worksheet Dim lstObj As ListObject For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam End Sub 

• Enfin, exécutez le code en appuyant sur F5 sur votre clavier et vous voyez le résultat dans votre feuille de travail.

• Ce site VBA effacera tous les filtres de l'ensemble de votre classeur, comme le montre l'exemple ci-dessous. première méthode .

Explication du code VBA

 For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam 

La première boucle permet de parcourir tous les tableaux du classeur et la deuxième boucle permet de parcourir tous les tableaux de la feuille de calcul. Ensuite, la ligne à l'intérieur de la boucle efface simplement le filtre du tableau. Après cela, fermez la boucle avec les deux dernières lignes.

Lire la suite : Raccourci pour le filtre Excel (3 utilisations rapides avec exemples)

Conclusion

Les méthodes ci-dessus vous aideront à Supprimer le filtre dans Excel VBA J'espère que cela vous aidera ! Si vous avez des questions, des suggestions ou des commentaires, n'hésitez pas à nous en faire part dans la section "Commentaires". Vous pouvez également consulter nos autres articles dans la section "Articles". ExcelWIKI.com blog !