Makro aus Excel in OO Calc???

[Heichi]

Hallo zusammen,

ich sitze zum ersten mal an OO calc und habe eine Excel-Datei geöffnet, die folgendes Makro enthält.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = ("$B$4") Then

Range("B6").Select
Selection.ClearContents
Range("B8").Select
Selection.ClearContents

End If

End Sub

Hätte jemand schnelle Hilfe für mich, wie man dieses "Excel-Makro" unter OO calc zum laufen bringt???
Wäre genial...

Danke, Michi