Discussion :

[lij29]

Bonjour,

Je dois exporter sous format PDF des tableaux qui s'ajoutent au fur et à mesure. Pour cela, j'aimerais à chaque ajout les ajouter à la zone d'impression via une macro VBA mais je n'y arrive pas.
J'ai essayé en utilisant l'enregistreur de macro mais il me propose .OnAction.AutoSize = "$A$29:$N$49,$A$5:$N$25,$A$53:$N$66,$A$70:$N$76" (les plages sont les plages des tableaux de la zone d'impression (un tableau par page)).
Merci de me débloquer, c'est pour un rapport que je dois rendre la semaine prochaine donc assez urgent :/

[Zekraoui_Jakani]

Je ne suis pas sûr de comprendre ce que vous voulez faire; mais il y a moyen de faire varier la zone d'impression à volonté en vba:
utiliser par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$M$45"

Si la zone d'impression doit varier, alors on définit une variable dans laquelle on stocke la plage voulue:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub printAreaDef()
    Dim myRNG As String
 
    myRNG = "A1:M145"   'à faire varier d'une façon intelligente
    Worksheets("Sheet1").PageSetup.PrintArea = myRNG
'Lancer l'impression en pdf, puis recommencer pour la zone suivante, via une boucle
 
End Sub

[lij29]

Merci mais en fait j'aimerais que l'impression se fasse d'un coup pour toutes les plages (ie les tableaux) sélectionnées dans la zone d'impression, comme on peut le faire sur Excel avec "Ajouter à la zone d'impression".