07.05.2017, 09:19
(Dieser Beitrag wurde zuletzt bearbeitet: 07.05.2017, 09:36 von WillWissen.
Bearbeitungsgrund: Mikroschriftformatierung aufgehoben und Makro in Codetags gesetzt
)
Hallo,
ich habe mal wieder ein Makro welches auf meinem Mac nicht funktioniert.
Es kommt immer "Fehler beim drucken"
Dabei möchte ich es garnicht drucken, sondern nur als PDF speichern.
Kann Microsoft Office 365 dies vielleicht garnicht?
Hier das Makro.
Vielleicht hat einer eine Idee.
MfG Andre
ich habe mal wieder ein Makro welches auf meinem Mac nicht funktioniert.
Es kommt immer "Fehler beim drucken"
Dabei möchte ich es garnicht drucken, sondern nur als PDF speichern.
Kann Microsoft Office 365 dies vielleicht garnicht?
Hier das Makro.
Code:
Sub pdfSpeichern()
Dim strDatName As String
Dim strDesktop As String
Dim strExport As String
strDatName = ActiveSheet.Range("A1").Text 'Zelle anpassen
strDesktop = "Macintosh HD:Users:HoffesMac:Desktop:" 'Pfad anpassen
strExport = strDesktop & strDatName
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
strExport, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
Vielleicht hat einer eine Idee.
MfG Andre