VBA · Excel

Excel-Arbeitsblatt als PDF exportieren

Exportiert das aktive Arbeitsblatt als PDF neben die Arbeitsmappe.

VBA
Sub BlattAlsPDF()
    Dim ziel As String
    ziel = ThisWorkbook.Path & "\" & ActiveSheet.Name & ".pdf"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ziel
End Sub
VBAExcelPDF
WA