Discussion :

[trane51]

Bonjour à tous,

J'ai un petit souci concernant le code d'un filtre avancé où je prends les données de la feuille 1 pour les filtrer sur la feuille 3 en utilisant le filtre avancé, j'ai un souci car cela me bug toute la mise en forme de la feuille 1.

Quelqu'un a-t-il déja eu ce problème ou une solution???

Merci d'avance

[Pierre Fauconnier]

Salut.

Avec le code qui pose problème, c'est mieux...

[trane51]

Oui en effet cela serait mieux désolé!!

Voici:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("Base").Range("A14:O132").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("A4:O5"), CopyToRange:=Range("A9:O9"), Unique:=False

[Pierre Fauconnier]

Comme tu ne précises pas les feuilles des plages de CriteriaRange et de CopyToRange, Excel prend celles de la feuille active. Il faut donc que la feuille active ne soit pas la feuille Base.

Tu aurais donc intérêt à préciser les feuilles de tes plages.

[trane51]

Comme ceci??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("Base").Range("A14:O132").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Sheets("Feuil3").Range("A4:O5"), CopyToRange:=Sheets("Feuil3").Range("A9:O9"), Unique:=False

[Pierre Fauconnier]

Faudrait peut-être essayer...

[trane51]

Bonjour,

Je test ce code rien ne marche, je ne vois pas mon erreur depuis plusieurs jour où je la cherche

[Pierre Fauconnier]

Donne le code que tu utilises... C'est parfois une bêtise et on l'a tellement devant les yeux qu'on ne la voit pas...

[trane51]

Voici:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("Base").Range("A14:O132").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Sheets("Feuil3").Range("A4:O5"), CopyToRange:=Sheets("Feuil3").Range("A9:O9"), Unique:=False

[gFZT82]

Bonjour trane51,

J'ai effectué le test de ton code et je n'ai rien remarqué de particulier, il semble fonctionner correctement.

Je joints mon fichier test pour que tu le compares avec le tien.

Cordialement.

[Pierre Fauconnier]

Les noms des feuilles sont-ils corrects?

Les plages renseignées sont les bonnes également?

As-tu un message d'erreur, et si oui, lequel?

...

Ta plage de critères semble reprendre TOUTES les colonnes de la table source. Est-ce nécessaire? As-tu vérifié tes critères?

Sois plus explicite et détaillé et nous pourrons mieux t'aider.

[trane51]

Noms et plages corrects, aucun message d'erreur mais rien ne s'affiche....

Oui en effet je reprends toutes les colonnes du tableau de la feuille source mais j'en ai besoin.

Par contre je ne vois pas pourquoi l'écriture dans les cellules du fichier test que m'a envoyé gFZT82 les critéres sont écrits sous la forme ='=xxx'. C'est peut etre cela qui pose problème car moi je ne le faisait pas. Je vais donc essayer cela sur mon fichier

Après essais, le filtre se fait mais ne me trouve qu'un seul résultat même s'il y en a plusieurs... C'est à n'y rien comprendre

[Pierre Fauconnier]

Le résultat est-il identique lorsque tu réalises le filtre manuellement?

Si oui, c'est probablement une histoire de critères et il faudra chercher de ce côté.

As-tu, dans certaines colonnes, des valeurs qui pourraient être interprétées de différentes façons (numérique ou chaine de caractères) ?