XL 2013 Décaler TCD

Comfortably_Numb

XLDnaute Junior
Bonjour à tous,

Je travaille sur l'élaboration d'un rapport qui serait composé de 9 TCD.
La problématique à laquelle je fais face consiste à faire en sorte que lorsqu'un filtre est appliqué, ce qui sera le cas dans chaque TCD, le TCD qui se trouve en dessous du premier (et ainsi de suite), soit "collé" au précédent.

En P.J. un exemple de deux TCD réalisés l'un à la suite de l'autre.
Existe-il une solution (macro ?) pour faire en sorte qu'en filtrant le premier, sous ce premier TCD il n'y ait pas de blanc ?

Merci pour votre aide :)
 

Pièces jointes

  • Décaler TCD.xlsx
    19.5 KB · Affichages: 10

danielco

XLDnaute Accro
Bonjour,

Mets cette macro dans le module de la feuille "Feuil3" :

VB:
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
  Rows.Hidden = False
  Rows(Application.Min(Target.TableRange2.Rows.Count + 1, 28) & ":28").Hidden = True
End Sub

Cordialement.

Daniel
 

Discussions similaires

  • Résolu(e)
XL 2016 TCD
Réponses
10
Affichages
1 K

Statistiques des forums

Discussions
311 725
Messages
2 081 949
Membres
101 851
dernier inscrit
vaiata