Удалить первые строки внутри ячеек в libreoffice calc

Question

У меня большое количество ячеек в libreoffice cal c, и в каждой ячейке есть две строки. Я хочу удалить каждую первую строку из каждой ячейки. Любой простой способ? Этот фрагмент кода прекрасно работает в VBA excel, но не запускается в libreoffice cal c.

{Sub RemoveFirstLine (целевой диапазон ByRef)

Dim xCell As Range

For Each xCell In Target.Cells

    xCell.Value = Right(xCell.Value, Len(xCell.Value) - InStr(1, xCell.Value, vbLf))

Next

End Sub

Sub StartRemove ()

Dim xRng As Range

При ошибке Resume Next

Установить xRng = Application.InputBox («Пожалуйста, выберите диапазон:», «Учебник по Excel 10» » , Selection.Address,,,,, 8)

Если xRng ничего не значит, выйдите из Sub

При ошибке Resume Next

RemoveFirstLine xRng

End Sub }