Bonjour,
je souhaite ne pas afficher dans mon tableau croisé dynamique les lignes contenant des zéros à l'aide d'une macro.
Voici mon code :
Je parcours ma deuxième colonne et si la valeur est nulle alors je souhaite ne pas voir la ligne. Le soucis c'est que mon filtre est sur ma première colonne du coup le PvI.Visible n'est pas appliqué dans la bonne colonne.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Sub filtresTCD() ' ' filtresTCD Macro ' Dim PvI As PivotItem Sheets("Data").Select Sheets("Data").Activate With ActiveSheet.PivotTables("TCD").PivotFields(2) For Each PvI In .PivotItems Select Case PvI.Name Case Is = "0" PvI.Visible = False End Select Next End With End Sub
Pourriez vous m'aider afin d'appliquer le PvI.Visible à ma première colonne lorsque je rencontre une valeur nulle.
Merci pour votre aide.
Partager