von Pit66 » Mi, 22.04.2020 10:24
...noch abschließend mein Ergebnis:
Habe den PDFtk server installiert.
Dieser hat folgende Syntax: pdftk A=datei1 B=datei2 (usw.) schuffle A B (usw.) output datei
Und so habe ich es eingebunden:
Code: Alles auswählen
pdftk = "pdftk "
pdfin = "shuffle "
pdfout = "output "
for k = 1 to i
ocell = osheet.getCellRangeByName("B91")
ocell.string = k
sURL = replace(oDoc.url,".ods","_" & k & ".pdf")
myProps(0).Name="FilterName"
myProps(0).Value = "calc_pdf_Export"
ThisComponent.storetoUrl(sUrl,myProps())
pdftk = pdftk & chr(64+k) & "=" & replace(sURL,"file:///","") & " "
pdfin = pdfin & chr(64+k) & " "
next k
pdfout = pdfout & replace(oDoc.url,".ods","_Test.pdf")
pdfout = replace(pdfout, "file:///","")
pdftk = pdftk & pdfin & pdfout
shell(pdftk)
Über Zelle B91 werden die Graphen dynamisch.
...noch abschließend mein Ergebnis:
Habe den PDFtk server installiert.
Dieser hat folgende Syntax: pdftk A=datei1 B=datei2 (usw.) schuffle A B (usw.) output datei
Und so habe ich es eingebunden:
[code]pdftk = "pdftk "
pdfin = "shuffle "
pdfout = "output "
for k = 1 to i
ocell = osheet.getCellRangeByName("B91")
ocell.string = k
sURL = replace(oDoc.url,".ods","_" & k & ".pdf")
myProps(0).Name="FilterName"
myProps(0).Value = "calc_pdf_Export"
ThisComponent.storetoUrl(sUrl,myProps())
pdftk = pdftk & chr(64+k) & "=" & replace(sURL,"file:///","") & " "
pdfin = pdfin & chr(64+k) & " "
next k
pdfout = pdfout & replace(oDoc.url,".ods","_Test.pdf")
pdfout = replace(pdfout, "file:///","")
pdftk = pdftk & pdfin & pdfout
shell(pdftk)
[/code]
Über Zelle B91 werden die Graphen dynamisch.