ich habe hier eine Funktion aus Excel 2019, die ich gerne in Calc benutzen möchte. Copy & Paste funktioniert natürlich nicht. Kann mir jemand dabei helfen, die Funktion anzupassen oder zu übersetzen?
Code: Alles auswählen
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Target.Offset(0, 1).Resize(1, 3).Value = Array(Date, Time, "X")
End Sub