Как сделать код VBA совместимым с офисом libre

Я недавно перешел на pclinuxos из Windows и, похоже, мне это нравится. Единственная проблема, с которой я сталкиваюсь, заключается в том, что libreoffice, пакет электронных таблиц по умолчанию, не совместим с макросами Excel. Ниже код VBA у меня есть:

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

Есть ли способ конвертировать этот код, чтобы сделать его совместимым с libreoffice, или мне нужно изучать совершенно новый язык, такой как python? Изучение Python не было бы проблемой, но не является решением моей проблемы, так как у меня есть много связанных с работой файлов в Excel, которые содержат много кода VBA, и я не могу использовать open office / libreoffice на работе ...

Я просто хочу добавить, что функция SinceLastWash дает правильное значение в некоторых ячейках, где я его использую, а в других выдает ошибку, #NAME?

Спасибо

Ответы на вопрос(5)

Ваш ответ на вопрос