OpenOffice.org BASIC Guide.pdf - OpenOffice.org wiki

Cells and Ranges 132
the columns after the insert position are moved to the right.
The removeRange method is the counterpart to the insertCells method. This method deletes
the range that is defined in the CellRangeAddress structure from the sheet.
Dim Doc As Object
Dim Sheet As Object
Dim CellRangeAddress As New com.sun.star.table.CellRangeAddress
Doc = StarDesktop.CurrentComponent
Sheet = Doc.Sheets(0)
CellRangeAddress.Sheet = 0
CellRangeAddress.StartColumn = 1
CellRangeAddress.StartRow = 1
CellRangeAddress.EndColumn = 2
CellRangeAddress.EndRow = 2
Sheet.removeRange(CellRangeAddress,
com.sun.star.sheet.CellDeleteMode.UP)
This example removes the B2:C3 cell range from the sheet and then shifts the underlying
cells up by two rows. The type of removal is defined by one of the following values from the
com.sun.star.sheet.CellDeleteMode
enumeration:
NONE
UP
LEFT
ROWS
the current values remain in their current position.
the cells at and below the insert position are moved upwards.
the cells at and to the right of the insert position are moved to the left.
the rows after the insert position are moved upwards.
COLUMNS
the columns after the insert position are moved to the left.
The XRangeMovement interface provides two additional methods for moving (moveRange)
or copying (copyRange) cell ranges. The following example moves the B2:C3 range so that
the range starts at position A6:
Dim Doc As Object
Dim Sheet As Object
Dim CellRangeAddress As New com.sun.star.table.CellRangeAddress