OpenOffice.info

Dim Doc as object
Dim T1 as object

Doc = ThisComponent
T1 = Doc.sheets.getByName("Tabelle1")

Dim Doc as object
Dim Controller as object
Dim T1 as object

Doc = ThisComponent
Controller = Doc.CurrentController
T1 = Controller.ActiveSheet

Hallo Harry!

Das Ansprechen eines Worksheets ist in OOo nicht ganz so wie in Excel. Hier muss immer mit dem ganzen Workbook angefangen werden. Bei der Zuweisung kann mit "Set" gearbeitet werden. Es kann aber auch darauf verzichtet werden.

[code]
Dim Doc as object
Dim T1 as object

Doc = ThisComponent
T1 = Doc.sheets.getByName("Tabelle1")
[/code]

Das aktive Tabellenblatt kann folgendermaßen angesprochen werden:

[[code]Dim Doc as object
Dim Controller as object
Dim T1 as object

Doc = ThisComponent
Controller = Doc.CurrentController
T1 = Controller.ActiveSheet
[/code]

Gruß
Charly

VBA hat nichts mit StarBasic zu tun.

Siehe erstes sticky Posting im OOo Basic und Java Forum
[url=http://de.openoffice.info/viewtopic.php?f=18&t=1553]Informationen zur StarBasic-Programmierung[/url]