in meiner Arbeitsmappe befinden sich zwei Blätter, deren PrintAreas ich in ein PDF speichern möchte.
Blatt 1 heißt toPRINTlinks (Codename wksPrintLinks)
Blatt 2 heißt wksPRINTRechts (Codename wksPrintRechts)
In beiden Blättern setze ich vor dem Drucken im VBA-Code jeweils einen individuellen Druckbereich:
wksPrintLinks.PageSetup.PrintArea = wksPrintLinks.Range("L14:V42").Address
wksPrintRechts.PageSetup.PrintArea = wksPrintRechts.Range("B2:L30").Address
Ausdrucken/Speichern versuche ich mit:
Worksheets(Array("toPRINTlinks", "toPRINTrechts")).Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\User\Desktop\Hugo.pdf"
Als Ergebnis erhalte ich ein leeres PDF ??
Habt Ihr eine Idee, was ich hier falsch mache?
Danke fürs Helfen :-)
Peter