Discussion :

[prorudess]

Bonjour à tous,
J'ai beau chercher sur les forums je ne trouve pas de réponse à ma solution.
Pour faire simple, je voudrais que, lorsque je filtre une colonne dans ma Feuil1, la colonne qui contient le même nom en entête et les mêmes données dans la Feuil2 se filtre de la même manière.
Je pense qu'il n'y a pas d'autre solution "si l'on exclu l'hypothèse du tableau croisé dynamique" que de passer par du VBA, mais je n'arrive pas à la mettre en place.
D'avance merci de votre aide.

PS : Je vous joint un fichier exemple pour illustrer mon problème.

[MarcelG]

Bonjour Proudess, Bonjour le Forum,

Tout d'abord, bienvenu sur le Forum!

Il te faut dans un premier temps relever ton critère de filtre sur ta 1ère feuille, puis appliquer celui-ci sur la 2ème.

(à adapter)

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub Essai()
 
crit = Sheets("Feuil1").Range("A2:A19").SpecialCells(xlCellTypeVisible).Cells(1, 2).Value
With Sheets("Feuil2")
        'désactive le filtre éventuel précédent
        If .FilterMode = True Then .ShowAllData
        'active le filtre suivant le même critère
        .Range("A1:B19").AutoFilter Field:=2, Criteria1:=crit
End With
End Sub

N''hésite pas à revenir en cas de besoin.

[prorudess]

Tout d'abord merci pour cet accueil et cette réponse. Par contre je dois t'avouer que je suis un peu perdu avec ce bout de code et j'ai du mal à l'adapter à mon fichier.

[MarcelG]

Salut prorudess,

Ce code est actif sur ta pièce jointe.

Comme toujours, il te faut adapter le code proposé notamment sur
- le nom de tes feuilles
- les champs à filtrer

Si le problème persiste, tu peux retourner une description sommaire de ton classeur (feuilles et champs à filtrer..)

[prorudess]

Merci beaucoup j'ai trouvé la solution à mon probleme.

[MarcelG]

Salut prorudess,

Peux-tu préciser.
Quelle(s) solution(s) pour quel problème?

Sinon, n'oublie pas de positionner ton post en mode "Résolu".