Seite 1 von 1
XLS-Export eines bestimmten Tabellenblattes
Verfasst: So, 22.12.2019 15:38
von Postbyme
Hallo,
nachdem mit folgendem (hier im Forum gelernten) Code eine PDF-Datei aus einem Tabellenblatt erstellt werden kann:
Code: Alles auswählen
ls_datei = "file:///C:/test/alist.pdf"
Dim pdfProperties(2) as new com.sun.star.beans.PropertyValue
pdfProperties(0).Name = "FilterName"
pdfProperties(0).Value = "writer_pdf_Export"
Dim aFilterData(0) as new com.sun.star.beans.PropertyValue
aFilterData(0).Name = "Selection"
aFilterData(0).Value = ThisComponent.Sheets(3)
pdfProperties(2).Name = "FilterData"
pdfProperties(2).Value = aFilterData()
ThisComponent.storeToURL( ls_datei, pdfProperties())
möchte ich mit dem Filter "MS Excel 97" ein Tabellenblatt als Excel-Dokument entladen. Das funktioniert jedoch nur teilweise. Es wir nämlich das komplette Dokument mit allen anderen Tabellenblättern
entladen und nicht nur das Tabellenblatt 4. Was mache ich falsch
?
Danke
Re: XLS-Export eines bestimmten Tabellenblattes
Verfasst: So, 22.12.2019 21:03
von Postbyme
Hallo,
habe jetzt selber gesehen, dass es für die jeweiligen "FilterName" nicht alle Möglichkeiten gibt - wahrscheinlich für "MS Exel 97" nicht mit Auswahl des Sheets. Ich glaube ich sollte einen anderen Weg gehen und ein neues Calc-Dokument aus dem Makro heraus öffen und die Zellbereiche dorthin kopieren?
Danke
Re: XLS-Export eines bestimmten Tabellenblattes
Verfasst: So, 22.12.2019 21:24
von Stephan
Wahrscheinlich ist es am Einfachsten das gesamte Dokument nach xls zu exportieren und anschließend die überflüssigen Tabellen des xls zu löschen.
Gruß
Stephan
Re: XLS-Export eines bestimmten Tabellenblattes
Verfasst: Mo, 23.12.2019 06:35
von Postbyme
Oh ja, pfiffige Möglichkeit - aber mal sehen - ODS sehr groß und würde dann um 98 Prozent wieder schrumpfen. Auf jeden Fall schöne Übung für mich.
Gruß
Re: XLS-Export eines bestimmten Tabellenblattes
Verfasst: Mo, 23.12.2019 08:10
von Hiker
Hallo,
wenn ich das "manuell" machen will, würde ich so vorgehen, wie Stephan vorschlug. In einem Macro aber umgekehrt in der offenen Datei alle Blätter ausser dem aktuellen (oder per Name/Numer identifizierten) löschen, dann via Speichern unter als xls speichern.
Zu klärende Fragen:
Vorher einmal als ODS speichern, damit Änderungen in den zu löschenden Blättern gesichert sind?
Wenn das restliche Blatt Referenzen auf eines der gelöschten Blätter hat, wird es Fehler geben - was eventuell der Grund ist es nicht einfach im Export-Filter als Bereich z.B. 2-5 anzubieten.
Mfg, Jörn