VBA-Makro nach OOoBasic

Hallo,

ich habe folgendes Problem. Wir sind von MS Office auf OOo umgestiegen.
Nun muss ich muss aber ein VBA-Makro in ein OOoBasic-Makro "übersetzen".
Leider habe ich keine Ahnung von OOoBasic.

In dem Makro soll folgendes passieren:
In einer Tabelle "Aufgaben" gibt es eine Spalte für "Aufgabennummer". Im Kopf einen Button "Nächste".
Klickt man auf diesen Button wird in der Tabelle "Syst" Feld 1, 2 auf die Zahl +1 addiert und diese dann in der gewählten

Zelle in Aufgaben/Aufgabennummer reingeschrieben. Verstanden?!?! Geht schlecht zu beschreiben.

Also:
- Benutzer wählt in Tabelle "Aufgaben" Feld A19 (oder A20, A21, ...)
- Klick auf "Nächste"
- Feld 1,2 in Tabelle "Syst" wird um eins erhöht
- diese neue Zahl wird dann in Tabelle "Aufgaben" Feld A19 (oder A20, A21, ...) eingefügt

So sieht das ganze in VBA aus:

Private Sub naechste_Click()
Dim hilfe As Worksheet
Dim nextnum As Integer
Set System = ActiveWorkbook.Worksheets("Syst")
nextnum = System.Cells(1, 2) + 1
System.Cells(1, 2) = nextnum
ActiveWorkbook.Worksheets("Aufgaben").Activate
ActiveCell.Value = nextnum
End Sub

Wäre echt toll, wenn mir jemand weiterhelfen könnte. Hab schon Stunden gegoogled und getestet aber dabei ist nix brauchbares rausgekommen...