Mise en page conditionnelle

[alexes82]

Bonjour,

J'aimerais imprimer un PDF et que la mise en page ce fasse automatiquement.

J'ai 2 colonnes à gauche (B et C) a répéter a chaque page.

Et je voudrais avoir une nouvelle page à chaque colonne vide.

Voir piéce jointe:

Merci

 

[alexes82]

Re : Mise en page conditionnelle

J'arrive à peu prés à faire ce que j'ai besoin mais arrivé à "10" ça plante!

Sub Macro34()
ActiveWindow.View = xlPageBreakPreview
ActiveSheet.ResetAllPageBreaks
Set ActiveSheet.VPageBreaks(1).Location = Range("R4")
Set ActiveSheet.VPageBreaks(2).Location = Range("AF4")
Set ActiveSheet.VPageBreaks(3).Location = Range("AW4")
Set ActiveSheet.VPageBreaks(4).Location = Range("BH4")
Set ActiveSheet.VPageBreaks(5).Location = Range("BX4")
Set ActiveSheet.VPageBreaks(6).Location = Range("CJ4")
Set ActiveSheet.VPageBreaks(7).Location = Range("CR4")
Set ActiveSheet.VPageBreaks(8).Location = Range("DD4")
Set ActiveSheet.VPageBreaks(9).Location = Range("DP4")
Set ActiveSheet.VPageBreaks(10).Location = Range("EC4")
Set ActiveSheet.VPageBreaks(11).Location = Range("EN4")
Set ActiveSheet.VPageBreaks(12).Location = Range("EU4")
Set ActiveSheet.VPageBreaks(13).Location = Range("FA4")
Range("B2").Select
End Sub

Y a t'il une limite?

Merci