Makro: Ein Klick = .XLSX & .PDF

Forumthread: Makro: Ein Klick = .XLSX & .PDF
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Makro: Ein Klick = .XLSX & .PDF

19.06.2017 15:43:00

Pascal

Hallo liebes Forum,
gibt es eine Möglichkeit eine Excel-Datei über ein einziges Makro als "xlsx" und gleichzeitig noch als "pdf" abzuspeichern?
Finde dazu einfach keine Info's.
Liebe Grüße

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Makro: Ein Klick = .XLSX & .PDF

19.06.2017 15:52:42

UweD

AW: Makro: Ein Klick = .XLSX & .PDF

19.06.2017 15:52:42

UweD

Hallo

    Dim Pfad As String, DateiNam As String
Pfad = "C:\Temp\"
DateiNam = "Testdatei"
With ActiveWorkbook
.SaveAs Filename:=Pfad & DateiNam & ".xlsx", _
FileFormat:=xlOpenXMLWorkbook
.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Pfad & DateiNam & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:= _
True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End With

LG UweD

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!