Dzień dobry,
Mam następujący problem. Piszę pewne makro i wyskakuje mi błąd o treści:
Błąd uruchomieniowy języka BASIC.
Nie ustawiono zmiennej obiektu.
w linii:
lastDestinationRowNumber = ThisComponent.Sheets.getByName(sDest).createCursor().gotoEndOfUsedArea(True).RangeAddress.EndRow
Całe makro wygląda tak:
Sub moveRowFromToEndAndSortDestinationSheet(sDest As String, sSource As String, iRowNum As Integer)
Dim firstColumn
Dim lastColumn
Dim rowNumber
Dim lastDestinationRowNumber
firstColumn = 0
lastColumn = 255
rowNumber = iRowNum + 3
lastDestinationRowNumber = ThisComponent.Sheets.getByName(sDest).createCursor().gotoEndOfUsedArea(True).RangeAddress.EndRow
MsgBox lastDestinationRowNumber
'Dim oRangeAddress = ThisComponent.Sheets.getByName(sSource).getCellRangeByPosition(firstColumn, rowNumber, lastColumn, rowNumber).getRangeAddress
'Dim oCellAddress = ThisComponent.Sheets.getByName(sDest).getCellByPosition
End Sub
Nie wiem, co powoduje ten błąd. Czy winna jest zbyt długa linia z wieloma odwołaniami do składowych i metod tych obiektów?