Makro: aktive Zeile kopieren und in Worksheet 2 einfügen

[sondeu]

Hallo,

ich kenne mich leider nicht wirklich aus mit der Programmierung und stehe nun vor einem Rätsel.

Ich habe derzeit ein Excel Sheet mit Makro und möchte auf OO umsteigen um das auch unter Linux nutzen zu können.

Das Makro kopiert einfach nur die aktive Zeile und kopiert es in ein anderes Worksheet. Ziemlich Simpel, aber wie geht das ganze in OpenOffice?

Hier das Excel Makro

Code: Alles auswählen

Sub ZeilenKopieren()
  Dim wks As Worksheet
  Dim iRow As Integer
  Set wks = Worksheets("Funktionen")
  iRow = 5
  Rows(ActiveCell.Row).Copy wks.Rows(iRow)
  Application.CutCopyMode = False
  wks.Columns.AutoFit
  Sheets("Rechnung").Select
    Range("A1").Select
   
End Sub

Hat jemand dafür eine Lösung parat?

[DPunch]

Aloha

Schau Dich doch mal Hier um.