Hallo! also ich kämpfe schon seit tagen mit einem Makro. ich möchte ein Makro haben mit dem ich die aktuelle tabelle als pdf im Ordner der Originaldatei speichere.
folgendes hätte ich hinbekommen aber es funktioniert einfach nicht:
Sub SaveActiveSheetAsPDFInMacExcel2016()
Dim FileName As String
Dim FolderName As String
Dim FilePathName As String
'Ordnername
FolderName = "PDFSaveFolder"
'Dateiname
FileName = ActiveSheet.Name & "_19.pdf"
FilePathName = ActiveWorkbook.Path & Application.PathSeparator & FileName
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
FilePathName, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False
End Sub
kann mir da mal bitte jemand helfen
ich hab den Fehler auch mal als screenshot hochgeladen...
Bitte bitte!
folgendes hätte ich hinbekommen aber es funktioniert einfach nicht:
Sub SaveActiveSheetAsPDFInMacExcel2016()
Dim FileName As String
Dim FolderName As String
Dim FilePathName As String
'Ordnername
FolderName = "PDFSaveFolder"
'Dateiname
FileName = ActiveSheet.Name & "_19.pdf"
FilePathName = ActiveWorkbook.Path & Application.PathSeparator & FileName
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
FilePathName, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False
End Sub
kann mir da mal bitte jemand helfen
ich hab den Fehler auch mal als screenshot hochgeladen...
Bitte bitte!
