Probleme mit Druck-Macro nach Update auf 2.3.1/2.4 von 2.0

[2stupid4this]

Hallo zusammen,

ich habe ein Makro mit dem aus mehreren Arbeitsmappen in Calc vordefinierte Bereiche in einem "rutsch" durch anklicken einer Schaltfläche ausdrucke.

Bisher war die Version 2.0 im Einsatz. Nun seit Umstellung auf 2.3.1 bzw. 2.4 funktioniert das Makro nicht mehr. Hat jemand eine Idee warum nicht.

Code: Alles auswählen

Sub Drucken 
Dim oDoc As Object
Dim oSheet As Object
Dim oZeile As Object
oDoc = ThisComponent
oShAktiv = oDoc.Sheets.GetByName("Test1") 

 
'Druckbereich für Testbereich festlegen
Dim oAktiv(0) As New com.sun.star.table.CellRangeAddress 
Dim oAktiv2() As New com.sun.star.table.CellRangeAddress 
oAktiv(0).Sheet = oShAktiv.Rangeaddress.sheet 
oAktiv(0).StartColumn = 0 : oAktiv(0).StartRow = 0 
oAktiv(0).EndColumn = 13 : oAktiv(0).EndRow = 58 
oShAktiv.setPrintAreas(oAktiv()) 

'festgelegte Druckbereiche Drucken
oDoc.Print(Array()) 

'festgelegte Druckbereich löschen
oShAktiv.setPrintAreas(oAktiv2())

end sub

Das ist nur ein Ausschnitt. Selbstverständlich sollen mehrere Bereiche gedruckt werden.

Danke im voraus für die Hilfe
2stupid4this

[komma4]

Das Verhalten zum Drucken ist nun weiter konfigurierbar (und die Standardeinstellung hat sich geändert?).

siehe:
Extras>Optionen>OpenOffice.org>OpenOffice.org Calc>Drucken
und ändere mal "Nur ausgewählte Tabellen drucken"

Klappt es damit wieder?


Sonst wird eine Ferndiagnose ohne Beispieldatei und kompletten Code schwierig...
Du kennst XRay und setzt es zum Debuggen ein?



P.S.: Dein Ausschnitt vom Code setzt eine oAktivAdresse, druckt und löschst dann oAktiv2 ?

und bitte setze Code in die <code>tags: Code markieren, dann die Schaltfläche oberhalb des Schreibbereichs auslösen; Danke!

[2stupid4this]

Das mit den Einstellungen der Druckoptionen hat leider nichts gebracht.

Anbei nun eine Beispieldatei, die unter OpenOffice 2.0 automatisch durch anklicken der Schaltfläche den vorgegebenen Teilbereich der von Test1 und Test2 auf zwei Seiten ausdruckt.

test.ods

Testdatei mit Scriptcode

(9.62 KiB) 55-mal heruntergeladen

Unter 2.3.1 bzw. 2.4 wird nur eine Seite gedruckt.

Hat jemand eine Idee warum nicht?

Danke im voraus
2stupid4this

[komma4]

mit der deaktivierten Einstellung "Nur ausgewählte Tabellen drucken" werden bei der Testmaschine hier (WinXP, 2.3.1) alle Druckbereiche auf dem Drucker ausgegeben.

[2stupid4this]

Danke, habe ich inzwischen auch gefunden. Habe mich darauf versteift, dass die Optionen aktiviert sein müssen und nicht anders herum.