Excel VBA Zwei Bereiche zu einer 2-seitigen pdf exportieren?

Hallo,

ich möchte bei Excel VBA aus einer Arbeitsmappe eine zwei seitige Pdf. Exportieren (mittels Makros).

Mein Code sieht bisher wie folgt aus:

Sub SeiteExportieren ()

Dim DateiName As String

Dateiname = "Speicherort"

Tabelle1.PageSetup.PrintArea = "C7:T70, C71:T120"

Tabelle1.ExportAsFixedFormat Type:=xlTypePDF, FileName:=sFileName, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

End Sub

Bei dieser Funktion werden zwar zwei vorgegeben Bereiche herausgezogen, diese jedoch beide auf einer Seite dargestellt. Wie kann man die Funktion so verändern, dass die Seiten nach den angegebenen Bereichen trennt?

Danke im Voraus

Answer 1

[Suboptimierer]

Du hast IncluceDocProperties auf True gesetzt. Das bedeutet, du steuerst u. a. die Skalierung über die Tabelleneigenschaften.

In der Umbruchvorschau kannst du dann nochmal gezielt entscheiden, was auf welche Seite soll.

Der VBA-Befehl dazu lautet

Set ActiveSheet.HPageBreaks(1).Location = Range("C71")

Woher ich das weiß: Berufserfahrung – Programmierer