Umwandlung PDF nicht alles auf 1 Seite
19.01.2021 09:11:03
Markus
Wie schaffe ich es dass er den Bereich auf mehrere Seite im PDF aufteilt, so dass man es wieder lesen kann
Das PDF wird dann direkt mit Oulook verschickt
AWS = ActiveWorkbook.Path & "\" & "SOFIA WEATHER" & " " & ActiveSheet.Range("C1") & ".pdf"
ActiveSheet.Range("B1:W199").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=AWS, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=True, _
OpenAfterPublish:=False
InitializeOutlook = True
Anzeige
