A voir également:
- Impossible supprimer filtre excel
- Supprimer filtre avancé excel - Meilleures réponses
- Enlever tri excel - Meilleures réponses
- Supprimer rond bleu whatsapp - Guide
- Photo filtre 7 gratuit - Télécharger - Retouche d'image
- Impossible de supprimer une page word - Guide
- Liste déroulante excel - Guide
- Fichier impossible à supprimer - Guide
7 réponses
Bonjour,
Si c'est une zone filtrée autre que sur place, il suffit de sélectionner cette zone et appuyer sur "SUPPR".
Maintenant, par rapport à votre précédent post, voici une proposition qui peut vous intéresser.
-Saisissez vos critères de filtre avancé (jusqu'à 6 lignes de critères), ne pas toucher à la colonne "O".
-Cliquez sur le bouton "Appliquer le filtre avancé"
Le code utilisé:
Le fichier en exemple avec 4 choix de critères
https://mon-partage.fr/f/sMl9yTBZ/
Cdlt
Si c'est une zone filtrée autre que sur place, il suffit de sélectionner cette zone et appuyer sur "SUPPR".
Maintenant, par rapport à votre précédent post, voici une proposition qui peut vous intéresser.
-Saisissez vos critères de filtre avancé (jusqu'à 6 lignes de critères), ne pas toucher à la colonne "O".
-Cliquez sur le bouton "Appliquer le filtre avancé"
Le code utilisé:
Sub Filtre_Avance()
Application.ScreenUpdating = False
Range("I12:N100").Clear 'Effacement du filtre précédent
DerLig = Range("A" & Rows.Count).End(xlUp).Row 'Dernière ligne de la base de données
DerLig_Fil = Application.WorksheetFunction.CountIf(Range("O3:O8"), "OUI") + 2 'détecte la dernière ligne de la zone de filtre avancé
Range("A1:F" & DerLig).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range("I2:N" & DerLig_Fil), CopyToRange:=Range("I11:N11"), Unique:=True
End Sub
Le fichier en exemple avec 4 choix de critères
https://mon-partage.fr/f/sMl9yTBZ/
Cdlt
