Ich gehe meine gesamte Tabelle durch und füge nach jedem Seitenumbruch eine leere Zeile ein. Allerdings müsste die leere Zeile vor dem Umbruch eingefügt werden. Manchmal müsste ich auch vier Zeilen einfügen.
Weiß da jemand weiter?
With Worksheets(SheetToPrint)
LastEntry = .HPageBreaks.Count
For I = 1 To LastEntry
.Rows(.HPageBreaks(I).Location.Row).Insert Shift:=xlDown
Next I
End With
Vielen Dank im Voraus
Tony