Hallo zusammen,
ich arbeite momentan an einem Programm, das unter anderem Excel Dateien als PDF abspeichern soll. Ich habe beim suchen nach einer Lösung schon gesehen, dass es mithilfe von Druckern oder AddIns möglich ist, darauf würde ich aber gerne verzichten.
Normalerweise extrahiere ich die benötigten Befehle einfach aus in Excel erstellten Markos. Daraus ergibt sich in diesem Fall folgender Code:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\SC5\Desktop\test.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
Meistens genügt es, diesen Code etwas an Delphi anzupassen, also etwa so (Ziel ist ein String, welcher den Pfad enthält):
Delphi-Quellcode:
Excel.ActiveSheet.ExportAsFixedFormat(xlTypePDF, PWideChar(Ziel), xlQualityStandard,
True, False, False)
Hier stosse ich aber an das Problem, dass Delphi (Im Gegensatz zu den meisten Xl... Konstanten) weder XLTypePDF noch xlQualityStandart erkennt. Hat jemand eine Idee, wie ich die Werte der Konstanten herausfinden kann, um diese einzufügen, oder wie ich das Problem anders lösen kann ?
Vielen Dank für die Hilfe!