Hallo Andi,
ich versteh hier mittlerweile gar nix mehr. Und das schon mal allein wegen der Tatsache das deine Beispieldatei keine Übereinstimmung mit deinem letzten Screenshot hat.
Erschwerend kommt hinzu das Du hier immer von Formularen sprichst, das ein bestimmter Zellbereich gedruckt werden soll, aber nirgends ist wirklich was davon zu sehen was für Daten sich in den Zellbereichen befindet. Das einzige was man zu gesichte bekommt, sind die Titel *Blattnummer*, *Benutzer1* und *Benutzer2*. Das mit den Dateinamen etc. lassen wir mal aussen vor.
Das alles ergibt zumindest für mich alles kein Sinn, da die "Formulare" absolut ohne leben sind, sie sind also Tot. Wie soll man dir eventuell gescheit helfen können, wenn wir hier es mit etwas leblosen zu tun haben?
Ich sehe auch keinen Sinn darin, aus dem Blatt mit den "Formularen", immer nur so einen winzig kleinen Bereich auszudrucken wollen. Und das wahrscheinlich auch noch auf DIN-A4, so etwas nenn ich Verschwendung
.
Aber Halt, Stop!!
Mir ist da grad eben in deinem Code etwas aufgefallen, was mich stutzig macht.
Code: Alles auswählen
Dim aDruckbereich(0)
oCalc = thisComponent
osheets = oCalc.Sheets
'vorhandene Druckbereiche löschen
for i = 0 to osheets.count - 1
osheet = oSheets(i)
osheet.setPrintAreas(Array())
next i
osheet = thisComponent.currentcontroller.activesheet
[...]
Du hast also in der richtigen Datei mehrere Tabellenblätter mit Druckbereichen. Und diese löscht Du bevor das Aktive Blatt einen neuen Druckbereich zugeordnet bekommt um es anschließend als PDF auszudrucken. Jetzt versteh ich gar nix mehr. Was verbirgt sich in den anderen Tabellenblättern? Sollen diese auch gedruckt werden?
Ich finde es ist an der Zeit das Du endlich mal mit richtigen Fakten daherkommst.
Mach eine neue und gescheite Beispieldatei aus der man ersehen kann um was es wirklich geht. Ich will das einfach nicht glauben, das nur die paar Zellen aus dem einen Tabellenblatt mit den *Formularen* ausgedruckt werden sollen. Und wenn ja, was für Daten stehen da drin?
Falls es sich um Daten handelt die nicht für die Öffentlichkeit bestimmt sind, dann ersetze die durch andere, aber so das wir endlich verstehen was angesagt ist.
Erzähl mal mehr von der Datei, um was geht es da?
Es grüßt ein total verwirrter
balu