Ich bin vor kurzem von Windows zu pclinuxos gewandert und scheine es zu mögen. Das einzige Problem, vor dem ich stehe, ist, dass libreoffice, das Standard-Tabellenkalkulationspaket, nicht mit Excel-Makros kompatibel ist. Unten ist der VBA-Code, den ich habe:

Option VBASupport 
Sub DeleteToLeft()
    Selection.SpecialCells(xlBlanks).Delete shift:=xlToLeft
End Sub
Function SinceLastWash()
    Application.Volatile
    WashCount = 0
    WearCount = 0
    CurrentRow = Application.ThisCell.Row
    For i = 3 To 35
        If Range(Cells(CurrentRow, i), Cells(CurrentRow, i)).Value = "a" Then
            WearCount = WearCount + 1
        End If
        If Range(Cells(CurrentRow, i), Cells(CurrentRow, i)).Value = "q" Then
            WashCount = WashCount + 1
            WearCount = 0
        End If
    Next i
    SinceLastWash = WearCount
End Function
Function testhis()
testhis = Application.ThisCell.Row
End Function

Gibt es eine Möglichkeit, diesen Code so zu konvertieren, dass er mit libreoffice kompatibel ist, oder muss ich eine völlig neue Sprache wie Python lernen? Das Erlernen von Python wäre kein Problem, stellt jedoch keine Lösung für mein Problem dar, da ich viele arbeitsbezogene Dateien in Excel habe, die viel VBA-Code enthalten, und es mir nicht möglich ist, Open Office / Libreoffice bei der Arbeit zu verwenden.

Ich möchte nur hinzufügen, dass die Funktion SinceLastWash in einigen Zellen, in denen ich sie verwende, den richtigen Wert und in anderen Zellen den Fehler #NAME?

Vielen Dank