XL 2019 Perte du filtre après avoir fait une extraction

[SplitFire]

Bonjour,

j'ai un macro qui copie les données de l'onglet Données selon les critères de l'onglet Critères dans l'onglet Extraction. Mon problème est lorsque que j'ai filtré au préalable mon onglet Données, je perds automatiquement le filtre qui avait été fait dans l'onglet Données. Lorsque je clic sur mon bouton Extraction, toutes les données sont alors affichées. Je dois alors réactiver les filtres sur l'entête de colonne de mon onglet Données et refaire le filtre.

Voici mon code :

Sub ExtraireSelonCritere()
' ExtraireSelonCritere Macro
Sheets("Extraction").Select
ActiveWindow.SmallScroll ToRight:=10
Range("T3").Select
Sheets("Données").Range("DONNEES[#All]").AdvancedFilter Action:=xlFilterCopy _
, CriteriaRange:=Sheets("Critères").Range("D1:F2"), CopyToRange:=Range( _
"Extraction!Extract"), Unique:=False
Range("A1").Select
End Sub

Est-ce qu'il me manque quelque chose?

Merci!

 

[Bebere]

bonjour
Splitfire bienvenue
avec un fichier ce serait plus facile
Je pense que les critères doivent se trouver dans la feuille extraction
cette ligne est elle exacte Range("Extraction!Extract")
si tu n'as pas besoin de toutes les colonnes de données,tu peux mettre les entêtes des colonnes qui te sont utiles dans extractions
même syntaxe peu importe l'ordre
les 3 premières lignes sont inutiles

 

[SplitFire]

Merci pour le message de bienvenue Bebere. Voici mon fichier, je test à l'instant.

Le mot de passe est test.

 

[chris]

Bonjour

On ne peut pas avoir à la fois un filtre auto et un filtre avancé sur une même plage donc c'est normal...

 

[SplitFire]

Bonjour

On ne peut pas avoir à la fois un filtre auto et un filtre avancé sur une même plage donc c'est normal...

Est-il possible de contourner le problème? Je pourrais peut-être avoir une table de donnée intermédiaire qui pourrait servir pour le filtre avancé?

 

[chris]

RE

Met tous tes paramètres de filtre dans le filtre avancé