7.5.2 Wie kann man einen Druckbereich festlegen?
Man kann den Druckbereich über den Adressbereich eines Rangeobjektes zuweisen.

oCalc = thiscomponent
oSheet = oCalc.sheets(0)
oZellRange = oSheet.getCellRangeByName("$A$1:$B$5")
oCursor = oSheet.createCursorByRange(oZellRange)
oAdress = oCursor.RangeAddress
Dim aDruckbereich(0)
aDruckbereich(0) = oAdress
oSheet.setPrintAreas(aDruckbereich())
Seitenanfang