https://bugs.freedesktop.org/show_bug.cgi?id=47479
Jeremy <[email protected]> changed: What |Removed |Added ---------------------------------------------------------------------------- Severity|normal |major Priority|medium |high Version|3.5.1 release |4.0.2.2 release --- Comment #1 from Jeremy <[email protected]> --- I am getting the same error on 4.0.2.2 and previous release. I only get the error if I have deleted a range. The following code will recreate the problem. Sheet1 has a single range defined as "MYRANGE" and there is some data in the following cells. Sub Main Dim oSheet as Object DIM cBlock as New com.sun.star.table.CellRangeAddress dim myRow as integer oSheet = ThisComponent.sheets("Sheet1") myRow=oSheet.getCellRangeByName("MYRANGE").RAngeAddress.EndRow cBlock.Sheet=0 cBlock.StartColumn=0 cBlock.EndColumn=4 cBlock.StartRow=myRow+1 cBlock.EndRow=myRow+2 osheet.removeRange(cBlock, com.sun.star.sheet.CellDeleteMode.UP) myRow=oSheet.getCellRangeByName("MYRANGE").RAngeAddress.EndRow ' << fails here End Sub -- You are receiving this mail because: You are the assignee for the bug.
_______________________________________________ Libreoffice-bugs mailing list [email protected] http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
