Umsteigen auf OpenOffice: Von VBA zu OpenOffice-Basic - Teil 2

Löschen und Einfügen

Das Löschen eines Blattes erfolgt mit der Methode removeByName, mit der Methode insertByName oder insertNewByName(String, Index) wird ein neues eingefügt, mit movebyName wird ein Blatt verschoben.

Ein Blatt lässt sich ausblenden, indem seine Eigenschaft IsVisible auf false gesetzt wird. Dann jedoch hat der Benutzer keine Möglichkeit mehr, dieses Blatt in OOo wieder einzublenden.

Jedes Tabellenblatt enthält eine Liste mit seinen Zeilen und Spalten. Diese sind über die Sammlungen Rows beziehungsweise Columns des Spreadsheet-Objekts verfügbar und unterstützen die Services com.sun.star.table.TableRows beziehungsweise com.sun.star.table.TableColumns.

Sub ZeilenUSpalten1
Dim objDatei as Object
Dim objBlatt As Object
Dim objErsteZeile As Object
Dim objErsteSpalte As Object

objDatei = ThisComponent
objBlatt = objDatei.Sheets(0)
objErsteSpalte = objBlatt.Columns(0)
objErsteZeile = objBlatt.Rows(0)
End Sub

Das Beispiel in Listing 3 erzeugt zwei Objekte, die auf die erste Zeile und die erste Spalte eines Spreadsheets verweisen und legt diese in den Objektvariablen objErsteZeile und objErsteSpalte ab.