Fehler in Diagrammen (Datumsformat) beim Export einer Arbeitsmappe als pdf

Installiere einen PDF-Drucker wie z.B.
PDFCreator und drucke das Blatt als PDF aus.

Andreas.

Der "normale PDF-Export" in Excel... ich kenne nur speichern unter und damit die gesamte Tabelle exportiert, das Diagramm ist aber nur ein Container darin...

Ein Diagramm hat 2 Methoden etwas zu exportieren .Export und .ExportAsFixedFormat

Bei .Export kann man den Grafik Konverter frei wählen und zwar nach dem was im System registriert ist, zb. BMP, JPEG, GIF

Da .Export schon eine "uralte" Methode ist und PDF "neueren" Datums, geht PDF mit dieser Methode nicht.

Daher .ExportAsFixedFormat und PDF, was aber AFAIK technisch nicht anders funktioniert, d.h. alle sonstigen Skalierungen entfallen, das Chart-Objekt selber exportiert seine Daten.

(z.B. werden im Standard ja alle importierten Bilder runterskaliert / komprimiert wenn man eine Datei speichert.... um die Dateigröße klein zu halten. Siehe Datei\Optionen\Erweitert\Bildgröße und -qualität)

Andreas.

Ok ich hab noch nen bissel arbeit reingesteckt, weil ich mir nicht erklären konnte, dass ich einige Diagramme habe die funktionieren und einige nicht.

Die Ursache scheint in der Menge der zu verarbeitenden Daten zu liegen.

Und so wie es sich mir darstellt liegt das an Excel und nicht an den PDF druckern.

Weil:

Hat ein dokument um die 10000 Datenpunkte, funzt der pdf export nicht (diagramme leer) und das direkte "speichern unter" als pdf sorgt für einen crash von excel.

Hat ein Dokument so um die 1000 Datenpunkte funktioniert beides problemlos.



Ich konnte jetzt nicht jeden zwischenschritt durchspielen wo jetzt die genau grenze liegt, aber so wie es aussieht kann ich da wohl nix gegen machen. Problem ist bei 1000 punkten fehlen einfach einige sachen in meinem diagramm, die bei 10000 punkten da sind.
Mich wundert das ganze nur weil Excels grenze doch angeblich 32000 datenpunkte sind.

1) Diagramm-Export: VBA-Befehl .Chart.ExportAsFixedFormat schlägt fehl.

2) Diagramm-Export: VBA-Befehl .Chart.Export schlägt ebenfalls fehl.

3) Kontextmenü "Als Bild speichern ..." löscht eingefügte Formen aus Diagramm.

Über den Menübefehl "Format" > "Formen einfügen" können Textfelder, Linien, Ovale etc. in Diagramme eingefügt werden. Diese werden in Excel korrekt dargestellt. Beim Speichern als Bild (JPG, PNG etc.) werden die Formen in der oberen und der linken Bildhälfte
verdeckt. Im rechten unteren Quadranten sind Formen vorhanden.

Jeweils getestet auf 2 Macs mit mac OS 10.13.2(2) mit Excel 2016 16.9, Update 180116; auf drittem Mac 10.13.2(2) mit Excel 2016 16.9 ohne Update zeigen sich die Fehler nicht.

Also die Datenpunkte / Striche des PNG sehen doch recht gut aus, eine Größe von 709x432x32 sollten IMHO völlig ausreichen, größer skalieren macht ja keinen Sinn und kleiner sollte kein Problem geben.

Probier mal das Makro unten, das exportiert das Diagramm gleich als PDF. Wie sieht das aus?

Andreas.

Sub ExportChart()

Dim CO As ChartObject

Dim C As Chart

Static FName As Variant



'Ggf. Dateiname initialisieren

If VarType(FName) <> vbString Then FName = "test.pdf"



If TypeOf ActiveSheet Is Chart Then

'Aktives Blatt ist ein Diagramm

Set C = ActiveSheet

GoSub Export

Else

'Suche alle Diagramm in dieser Tabelle

For Each CO In ActiveSheet.ChartObjects

CO.Select

Set C = CO.Chart

GoSub Export

Next

End If

Exit Sub



Export:

If C.HasTitle Then FName = C.ChartTitle.Text

FName = Application.GetSaveAsFilename(FName, "PDF (*.PDF), *.PDF", 1, _

"Diagramm exportieren")

If VarType(FName) = vbBoolean Then Exit Sub

C.ExportAsFixedFormat xlTypePDF, FName, xlQualityStandard, True, True

Return

End Sub