sitze grad an einem Projekt, wo ich den VBA-Code in die OO Basic Sprache umwandeln muss. Nur leider hab ich nur eine Ahnung von VBA, aber leider keine von OO Basic

Jetzt habe ich da paar Probleme, wo ich selbst nachgeforscht habe, aber trotzdem nicht weiterkam:
1. Ich hab ein Listenfeld auf Calc ohne Dialog etc. Dieses Feld muss jetzt beim Hochfahren des Dokumtes leer sein, fals vorher etwas ausgewählt wurde.
VBA-Code: lb_bonus.clear
2. Ich muss ja aber dafür erst das Listenfeld ein Bereich überweisen, das diese dann anzeigt. Das Listenfeld ist z.B. bei Tabelle 1 enthalten und der Bereich in der 3. Tabelle. Wie muss der Code lauten damit dieser geschieht?
VBA-Code:
Do
lb_bonus.AddItem (Worksheets("3").Cells(i, 10))
i = i + 1
Loop Until (IsEmpty(Worksheets("3").Cells(i, 10)))
Ich danke schon im Voraus für euere Hilfen.
Gruß
Usta