OpenOffice.org BASIC Guide - OpenOffice.org wiki

More Than Just Text
Here are the central methods of the com.sun.star.table.XtableRows interface:
getByIndex(Integer)
returns a row object for the specified index.
getCount()
returns the number of row objects.
insertByIndex(Index, Count)
inserts Count rows in the table as of the Index position.
removeByIndex(Index, Count)
deletes Count rows from the table as of the Index position.
Whereas the getByIndex and getCount methods are available in all tables, the insertByIndex and
removeByIndex methods can only be used in tables that do not contain merged cells.
The com.sun.star.text.TextTableRow service provides the following properties:
BackColor (Long)
background color of row.
Height (Long)
height of line in 100ths of a millimeter.
IsAutoHeight (Boolean)
table height is dynamically adapted to the content.
VertOrient (const)
vertical orientation of the text frame — details on vertical orientation of the text within the table (values in
accordance with com.sun.star.text.VertOrientation)
Columns
Columns are accessed in the same way as rows, using the getByIndex, getCount, insertByIndex, and
removeByIndex methods on the Column object, which is reached through getColumns. They can, however,
only be used in tables that do not contain merged table cells. Cells cannot be formatted by column in
OpenOffice.org Basic. To do so, the method of formatting individual table cells must be used.
Cells
Each cell of a OpenOffice.org document has a unique name. If the cursor of OpenOffice.org is in a cell, then the
name of that cell can be seen in the status bar. The top left cell is usually called A1 and the bottom right row is
usually called Xn, where X stands for the letters of the top column and n for the numbers of the last row. The cell
objects are available through the getCellByName() method of the table object. The following example shows a
loop that passes through all the cells of a table and enters the corresponding row and column numbers into the
cells.
Dim Doc As Object
Dim Table As Object
Dim Cursor As Object
Dim Rows As Object
Dim RowIndex As Integer
Dim Cols As Object
Dim ColIndex As Integer
Dim CellName As String
Dim Cell As Object
Doc = ThisComponent
Cursor = Doc.Text.createTextCursor()
Table = Doc.createInstance("com.sun.star.text.TextTable")
Table.initialize(5, 4)
84 OpenOffice.org 3.2 BASIC Guide · March 2010