Excel als PDF über Fernsteuerung speichern

[VkPenguin]

Danke erstmal für Deine Antwort

Ich befürchte, das ist eine ziemliche Anfängerfrage, aber was bedeutet das nun?

Das -

Delphi-Quellcode:

Excel.ActiveSheet.ExportAsFixedFormat('PDF', PWideChar(Ziel), 'Standard quality',
                                       True, False, False)

- kann doch nicht gemeint sein oder?

[Bummi]

Delphi-Quellcode:

Excel.ActiveSheet.ExportAsFixedFormat(0, PWideChar(Ziel), 0,
                                       True, False, False)

Wenn man schnell mal einen Stapel Konstanten bei Word und Excel braucht kann es hilfreich sein einfach eine Makro zu erstellen und sich den Wert in einer MsgBox anzeigen zu lassen.

Im Menü unter weitere Befehle >> Menüband anpassen >> Entwicklertools anhaken.

Code:

Sub dummy()
  MsgBox (xlTypePDF)
End Sub

[VkPenguin]

Ah, das ist ein super Tipp, danke Dir! Den werd ich sicher noch öfter brauchen können. Wenn ich es richtig gemacht habe, sind beide Werte in meinem Fall 0, ich habe es also mit

Excel.ActiveSheet.ExportAsFixedFormat(0, PWideChar(Ziel), 0, True, False, False) versucht. Daraufhin bekomme ich aber die Fehlermeldung "Die Zahl muss zwischen 1 und *Größtmöglicher Integer* liegen" und mein Programm gibt folgenden Fehler aus:

---------------------------
Sckg
---------------------------
OLE-Fehler 800A03EC.
---------------------------
OK
---------------------------

Was habe ich denn falsch gemacht ? Da es in Excel Konstanten sind (Oder?) kann es nicht daran liegen, dass sie durch Eingaben, die ich in meinem kleinen Makro nicht berücksichtigt habe, verändert werden...

*EDIT* Oh, ich sehe gerade, Du hast mir die Konstanten ja schon rausgesucht, das hatte ich ganz übersehen, sorry Naja, jetzt hab ich's immerhin auch mal selbst gemacht

[Bummi]

Das letzte false in dem Aufruf macht den Ärger, wenn Du das PDF nicht anzeigen musst setze dort einfach EmptyParam ein, ansonsten siehe hier:
http://msdn.microsoft.com/en-us/libr...ffice.12).aspx


Mit benannten Parametern kann man sich auf das beschränken was einen interessiert.

xls.ActiveSheet.ExportAsFixedFormat(Type:=0, Filename:='C:\temp\test.pdf', OpenAfterPublish:= true)

[VkPenguin]

Das funktioniert, vielen lieben Dank Allerdings erkennt Delphi "Type" automatisch und wirft daher einen Fehler (das Programm wird aber trotzdem gestartet). Die Rote Markierung irritiert aber trotzdem, gibt es einen Weg, das zu ändern?