Impression VBA plage multiple 2 Sheets

Bonjour à tous,

Alors voilà, j'essaie depuis hier d'imprimer une sélection sur 2 feuilles de mon tableur en vain... Je ne sais pas trop si c'est possible ou pas ?

Voici mon code :

Sub Full_Impr()
    Range(Sheets("Tp_Lb").Range("B17: S36"), Sheets("Pn_mt").Range("A16:FinFull_Impr.")).Select
    Application.SendKeys "^(p)"
    ActiveSheet.Activate
        With ActiveSheet.PageSetup
            .LeftMargin = Application.InchesToPoints(0.45)
            .RightMargin = Application.InchesToPoints(0.45)
            .TopMargin = Application.InchesToPoints(0.45)
            .BottomMargin = Application.InchesToPoints(0.45)
            .Orientation = xlPortrait
            .Zoom = False
            .FitToPagesWide = 1
            .FitToPagesTall = 1
        End With

End Sub

Problème ligne 2... je ne sais pas trop comment adapter pour imprimer ça correctement.

Je vous remercie par avance,

BOnne journée,

Bonjour Julien, bonjour le forum,

Une chose est sûre !... VBA ne permet pas de sélectionner deux plages dans deux onglets différents en même temps !... Mais rien ne t'empêche de les définir...

Je n'ai pas vraiment compris ton code avec cette variable FinFull_Impr qui sort de nulle part... Au cas où :

Sub Full_Impr()
Dim OS(1 To 2) As Worksheet

Set OS(1) = Worksheets("Tp_Lb")
Set OS(2) = Worksheets("Pn_mt")
OS(1).PageSetup.PrintArea = "B17:S36"
OS(2).PageSetup.PrintArea = "A16:" & FinFull_Impr 'elle est où cette variable ?
For I = 1 To 2
    With OS(I)
        With .PageSetup
            .LeftMargin = Application.InchesToPoints(0.45)
            .RightMargin = Application.InchesToPoints(0.45)
            .TopMargin = Application.InchesToPoints(0.45)
            .BottomMargin = Application.InchesToPoints(0.45)
            .Orientation = xlPortrait
            .Zoom = False
            .FitToPagesWide = 1
            .FitToPagesTall = 1
        End With
        .PrintOut
    End With
Next I
End Sub

FinFull_Impr c'est ma cellule en bas à droite de ma zone d'impression. c'est vrai que définir une zone d'impression serait plus simple.

Même en définissant l'impression de 2 zones d'impressions, ça ne pourrait pas me les imprimer dans un même fichier si je comprends bien ?

Puisque d'après ce que je comprends, ton code m'imprimera une sélection puis la seconde dans 2 documents séparés donc ?

Merci pour ta réponse

Re,

Dans ce cas, Julien, pourquoi ne pas copier/coller les deux plages dans un onglet provisoire, imprimer cet onglet et le vider ou le supprimer ensuite ?!...

Ouai, je vais faire comme ça alors

Merci bien pour l'aide

Bonne journée,