Hallo,
den Code für 1 Diagramm in eine Pdf Datei umzuwandeln, habe ich geschrieben, das funktioniert auch. Jetzt wollte ich 2 Diagramme in eine PDF exportieren. Jedoch bekomme ich den Fehler: Objekt unterstützt diese Eigenschaft und Methode nicht.
Hier mein Code:
ActiveSheet.Shapes.Range(Array("Chart 3", "Chart 1")).Select
Selection.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\all Diagrams.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True