Zone d'impression suivant tableau dynamique

Bonjour le forum,

Comment faire pour définir une zone d'impression d'un tableau croisé dynamique qui serait variable, sans que l'on est besoin de redéfinir la zone d'impression à chaque fois que l'on rajoute une ligne au tableau.

D'avance merci pour votre aide

Bonjour,

Grâce à Sebast (que je remercie une nouvelle fois) j'ai la solution à mon problème que je mets ci-dessous et qui peut intéresser d'autres personnes utilisant les tableaux croisés dynamiques :

Sub Print_TCD() 'Sebast

 If ActiveSheet.PivotTables.Count > 0 Then

 With ActiveSheet.PageSetup
 .PrintArea = ActiveSheet.PivotTables("Tableau croisé dynamique1").TableRange2.Address
 ' en écrivant ... TableRange2.Address et non TableRange1.Address, tu sélectionnes y compris le bloc au-dessus du TCD,
 ' celui où tu sélectionnes tes restrictions

 .FitToPagesTall = 1 ' pour ajuster à la taille de la page en hauteur
 .FitToPagesWide = 1 ' pour ajuster à la taille de la page en largeur
 .CenterHorizontally = True ' centrage horizontal
 .CenterVertically = True ' centrage vertical
 ActiveSheet.PrintOut
 End With

 End If

 End Sub

Bonne après midi

Rechercher des sujets similaires à "zone impression suivant tableau dynamique"