Salut,

Il faut sélectionner tout le tableau, jusqu'aux totaux en bas, faire zone d'impression définir, puis dans mise en page, il faut choisir ajuster à 1 page en largeur et ne rien mettre dans ajuster en hauteur. La zone s'ajustera alors automatiquement.

Bonne continuation

Wanajo38

Bonjour,


Après vérification sur Excel, j'ai toujours le même problème, que je mette 1 page à ajuster en largeur ou en hauteur.
L'impression ne prend en compte que le premier choix de définition.

A+

Bonjour.
Essaies de supprimer la zone d'impression.
Tu laisses sur 1 page en hauteur et largeur.
Cela devrait fonctionner.

Amicalement,
JM

Le seul souci avec cette solution (qui fonctionne malgré tout) et qu'il faut que je sélectionne à chaque fois le tableau et dans le menu de l'impression, il faut que je choississe "sélection" avant d'imprimer. Ce qui n'est pas l'idéal...

Oui je comprends, le souci est que ma feuille ne contient pas seulement le tableau et si je fais ce que tu dit, cela va tout m'imprimer et je ne le souhaite pas...

A+

Salut,

Je suis certain que ça marche. Il faut que tu annules toutes les zones d'impression. Ensuite tu refais ta zone de sélection et tu vas dans mis en page (en passant par l'aperçu avant impression) et tu choisis une page en largeur et rien en hauteur.

Autre chose : pour les tableaux croisés, il y a des options d'impression dans les options du tableau. C'est à dire, tu peux insérer des lignes après certains éléments ou encore des sauts de page... Cela permet une excellente présentation pour l'impression (aucun changement visuellement sur excel -> ne concerne que l'impression).

Dis moi si ça marche pas car je ne comprends pas pourquoi...

Bonne continuation

Wanajo38

P.S. : l'enregistreur de macro fonctionne très bien sur excel 2007... c'est comme avant. Il faut simplement cliquer sur affichage puis à droite -> enregistrer une nouvelle macro. Ensuite il faut effectuer les actions souhaitées et enfin cliquer sur arrêter l'enregistrement.

J'ai même "essayé" de créer une macro, mais sans succès.
C'est toujours la même plage qui s'imprime quelque soit la longueur du tableau...

A+

Le code au cas où :

Sub Impression()

    Range("a1").Select
    ActiveSheet.PageSetup.PrintArea = ""
    ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotSelect "", _
        xlDataAndLabel

    ActiveSheet.PageSetup.PrintArea = "$H$3:$K$37"
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = ""
        .RightHeader = ""
        .LeftFooter = ""
        .CenterFooter = "Page &P de &N"
        .RightFooter = ""
        .LeftMargin = Application.InchesToPoints(0.78740157480315)
        .RightMargin = Application.InchesToPoints(0.78740157480315)
        .TopMargin = Application.InchesToPoints(0.984251968503937)
        .BottomMargin = Application.InchesToPoints(0.984251968503937)
        .HeaderMargin = Application.InchesToPoints(0.511811023622047)
        .FooterMargin = Application.InchesToPoints(0.511811023622047)
        .PrintHeadings = False
        .PrintGridlines = False
        .PrintComments = xlPrintNoComments
        .PrintQuality = 600
        .CenterHorizontally = False
        .CenterVertically = False
        .Orientation = xlPortrait
        .Draft = False
        .PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
        .BlackAndWhite = False
        .Zoom = False
        .FitToPagesWide = 1
        .FitToPagesTall = False
    End With
    ActiveWindow.SelectedSheets.PrintPreview
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Ce fassil mon frer karaboudjan
clik sur fichier apre selectionne mise en page tu peu changer comme tuve reduire / agrendir 60
par exemple ok aperçu avent ampression tu trouve il de chongement.
pardone moi a mon francais.

Je m'inquiète sûrement pour rien...
...Mais suis-je le seul à avoir ce problème pour l'impression d'un TCD ?
Partout sur le net, on ne fait aucune référence là-dessus. Ca me paraît très louche !!!

Si quelqu'un peut me donner la clef, ce serai sympa...

Karaboudjan

Le seul moyen alternatif pour l'impression du TCD est de mettre sur deux feuilles différentes les données et le TCD.
Il faut également supprimer toutes les zones d'impression inutiles.

L'impression se fait parfaitement. Je remercie wanajo38.

Karaboudjan

Bonjour,

J'aimerai savoir quelle est la démarche pour pouvoir garder le même format d'un tableau croisé dynamique sur Excel aprés chaque manipulation sans utiliser la forme automatique .

je serai très heureux si quelqu'un connait la démarche.

D'avance, je vous remercie pour vos réponses.