Добро пожаловать на форум!
перечитал половину форума, но чего-то близкого пока не могу найти.
Возможно, не ту половину читал

Вот небольшой кусок макроса для MS Excel:
...
(В следующий раз заключай код в теги "Код" - значок с решеткой над полем для ввода сообщения)
А вот точно такой же кусок для LO:
Sub getReport()
' Прием отчета о работе
GlobalScope.BasicLibraries.LoadLibrary("Tools")
oCurrentController = ThisComponent.getCurrentController()
oActiveSheet = oCurrentController.getActiveSheet()
oFileDialog = CreateUnoService("com.sun.star.ui.dialogs.FilePicker")
oFileDialog.SetDisplayDirectory(ConvertToUrl("C:\"))
iOpenFile = oFileDialog.Execute()
If iOpenFile = 0 Then
MsgBox "Отчет не принят. Файл отчета не выбран."
Exit Sub
End If
On Error GoTo exitmacros
oDoc = OpenDocument(oFileDialog.Files(0), Array())
oSheets = oDoc.getSheets()
oSheet = oSheets.getByName("Оглавление")
If GetStringOfCellByName(oSheet, "C26") = "Отчет заполнен правильно!" Then
MsgBox "Проверка отчета завершена. Отчет заполнен правильно"
Else
MsgBox "Проверка отчета завершена. Отчет заполнен неверно. Данные не перенесены."
Exit Sub
End If
oSheet = oSheets.getByName("Отчет")
oActiveSheet.getCellRangeByName("A5:A200").setDataArray(oSheet.getCellRangeByName("A5:A200").getDataArray())
oDoc.Close (True)
oCurrentController.select(oActiveSheet.getCellRangeByName("A1"))
oCurrentController.select(Nothing)
Exit Sub
exitmacros:
MsgBox "Возникла непредвиденная ошибка. Данные не перенесены."
End Sub
Разница совсем небольшая - при желании этот язык освоишь быстро
(Хотел подписаться "Таргариен", но решил, что хватит и "Валар Моргулис"

)