XL 2016 Formule VBA pour filtrer un TCD à partir d'une cellule

B54

XLDnaute Nouveau
Bonjour,

Je cherche à activer un filtre dans mon TCD à partir d'une cellule. Dans ma formule je copie la cellule B2 pour l'appliquer dans le filtre du TCD. Mon problème est qu'il copie toujours le contenu exact de la cellule B2 (de ma formule de départ). La contenu de la cellule B2 sera toujours changé. Alors je veux simplement que la cellule B2 soit référée à mon filtre.

Voici ma formule qui ne fonctionne pas.

Merci de votre aide.

Sub coller_copier_3()
'
' coller_copier_3 Macro
'

'
Range("B2").Select
Selection.Copy
ActiveSheet.PivotTables("Tableau croisé dynamique5").PivotFields( _
"[Élève].[Nom-Prénom-code permanent élève].[Nom-Prénom-code permanent élève]"). _
VisibleItemsList = Array( _
"[Élève].[Nom-Prénom-code permanent élève].&[bob, le clown (ABCD11111111)]")
End Sub
 

chris

XLDnaute Barbatruc
Bonjour

Pas très clair. Si la filtre doit prendre la valeur de la cellule B2, la copie est inutile c'est la chaîne du filtre qu'il faut adapter.

A noter que pour filiter un TCD par VBA, il faut, si le champ à filtrer n'est pas un filtre de page, défiltrer le champ puis filtrer un par un les éléments non souhaités.

Il serait 1000 fois plus simple d'utiliser un segment qui permet de filtrer d'un clic que ce saisir une valeur dans un cellule et filtrer par VBA
 

merinos

XLDnaute Occasionnel
il y a quelques année j'avais réalisé ceci...

Si tu frappes "b" puis "e" puis "n" ... le combobox te presente tous les clients qui contiennent "b" puis "be" puis "ben" ...
Et en plus tu peux frapper 100... une part du code postal voir même "be 100"


Voici le post original.

Merinos
 

Fichiers joints

B54

XLDnaute Nouveau
Bonjour

Pas très clair. Si la filtre doit prendre la valeur de la cellule B2, la copie est inutile c'est la chaîne du filtre qu'il faut adapter.

A noter que pour filiter un TCD par VBA, il faut, si le champ à filtrer n'est pas un filtre de page, défiltrer le champ puis filtrer un par un les éléments non souhaités.

Il serait 1000 fois plus simple d'utiliser un segment qui permet de filtrer d'un clic que ce saisir une valeur dans un cellule et filtrer par VBA

Merci pour votre réponse.

Je construis un tableau de bord pour une personne débutante avec l'informatique. Je veux lui simplifier la vie. Le segment est une très bonne idée, mais il y a plus 6000 élément dans ce segment.

La recherche dans le segment sera trop longue. L'idée est que la personne puisse inscrire le nom quel veut dans une case et que le TCD lui donne les informations.

J'ai déjà un code VBA qui défiltre les données dans mon TCF. Il me reste seulement à prendre la valeur de B2 pour l'appliquer dans le filtre du TCD.
 

B54

XLDnaute Nouveau
il y a quelques année j'avais réalisé ceci...

Si tu frappes "b" puis "e" puis "n" ... le combobox te presente tous les clients qui contiennent "b" puis "be" puis "ben" ...
Et en plus tu peux frapper 100... une part du code postal voir même "be 100"


Voici le post original.

Merinos

Merci je vais vérifier votre fichier pour voir si je peux l'appliquer à mes besoins.
 

Discussions similaires


Haut Bas