Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment appliquer le même filtre à plusieurs feuilles Dans Excel?

Il peut être facile pour nous d'appliquer la fonction Filtre pour filtrer les données dans une feuille de calcul, mais, parfois, vous devrez peut-être filtrer plusieurs feuilles de calcul qui ont un format de données commun avec les mêmes critères de filtre. Les filtrer un par un vous fera perdre beaucoup de temps, ici, je peux vous présenter un moyen facile de le résoudre à la fois.

Appliquer le même filtre à plusieurs feuilles de calcul avec le code VBA


Filtrer les données selon plusieurs critères ou d'autres conditions spécifiques, telles que la longueur du texte, la casse, etc.

Kutools for Excel's Super filtre fonctionnalité est un utilitaire puissant, vous pouvez appliquer cette fonctionnalité pour terminer les opérations suivantes:

  • Filtrer les données avec plusieurs critères Filtrer les données par longueur de texte
  • Filtrer les données en majuscules / minuscules; Filtrer la date par année / mois / jour / semaine / trimestre

doc-super-filtre1

Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!


flèche bleue droite bulle Appliquer le même filtre à plusieurs feuilles de calcul avec le code VBA


Par exemple, j'ai quatre feuilles de travail comme la capture d'écran suivante doit être filtrée avec les mêmes critères que le produit = KTE à la fois.

doc filtre plusieurs feuilles 1

Il n'existe pas de moyen direct de filtrer les données dans plusieurs feuilles dans Excel, mais le code VBA suivant peut vous aider à terminer ce travail, procédez comme suit:

1. Maintenez le ALT + F11 clés, puis il ouvre la Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Appliquer le même filtre à plusieurs feuilles de calcul:

Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice 20160623
    Dim xWs As Worksheet
    On Error Resume Next
    For Each xWs In Worksheets
        xWs.Range("A1").AutoFilter 1, "=KTE"
    Next
End Sub

3. Et puis appuyez sur F5 clé pour exécuter ce code, tous les produits de KTE ont été filtrés dans toutes les feuilles de travail à la fois, voir capture d'écran:

doc filtre plusieurs feuilles 2

Note: Dans le code ci-dessus, dans ce xWs.Range ("A1"). AutoFilter 1, "= KTE" scénario, A1 et = KTE indique la colonne et les critères que vous souhaitez filtrer sur la base, le nombre 1 est le numéro de colonne sur lequel vous avez filtré, vous pouvez les changer à votre besoin. Par exemple, si vous voulez filtrer l'ordre supérieur à 50, il vous suffit de modifier ce script comme ceci: xWs.Range ("B1"). AutoFilter 2, "> 50".



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    berenice · 25 days ago
    how to eliminate filtered rows?
  • To post as a guest, your comment is unpublished.
    Sibi · 6 months ago
    How to use "Filter Between" Function, for the same multiple sheets?

    (Example: Time range)
  • To post as a guest, your comment is unpublished.
    Suyash · 6 months ago
    Can we use cell name like Product instead of A1 in : xWs.Range("A1").AutoFilter 1, "=KTE"
    I have different column and some names comes in different column.
    • To post as a guest, your comment is unpublished.
      Suyash · 6 months ago
      I have used filter in every sheet. And I want to change s.no from 1 2 3 serially in every sheet after filter.


      Please let me know if you have vba code for it
  • To post as a guest, your comment is unpublished.
    jarred · 8 months ago
    HI, does the super filter across the entire workbook automatically reapply whenever theres an update of the file?
  • To post as a guest, your comment is unpublished.
    Sebastian · 11 months ago
    Thank you for the code!! is there a way to change the "=KTE" to use a value from a List or Drop down list?