Apache OpenOffice (AOO) Bugzilla – Issue 14927
Final goto in a macro does not deselect previous data
Last modified: 2013-08-07 15:15:43 UTC
After running this recorded macro, the data area is still selected. Delete will delete it! Macro: sub Alpha rem ---------------------------------------------------------------------- rem define variables dim document as object dim dispatcher as object rem ---------------------------------------------------------------------- rem get access to the document document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") rem ---------------------------------------------------------------------- dim args1(0) as new com.sun.star.beans.PropertyValue args1(0).Name = "DbName" args1(0).Value = "Data" dispatcher.executeDispatch(document, ".uno:SelectDB", "", 0, args1()) rem ---------------------------------------------------------------------- dim args2(6) as new com.sun.star.beans.PropertyValue args2(0).Name = "ByRows" args2(0).Value = true args2(1).Name = "HasHeader" args2(1).Value = false args2(2).Name = "CaseSensitive" args2(2).Value = false args2(3).Name = "IncludeAttribs" args2(3).Value = false args2(4).Name = "UserDefIndex" args2(4).Value = 0 args2(5).Name = "Col1" args2(5).Value = 1 args2(6).Name = "Ascending1" args2(6).Value = true dispatcher.executeDispatch(document, ".uno:DataSort", "", 0, args2()) rem ---------------------------------------------------------------------- dim args3(0) as new com.sun.star.beans.PropertyValue args3(0).Name = "ToPoint" args3(0).Value = "$A$1" dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args3()) end sub
Created attachment 6456 [details] Spreadsheet containing simple macros
Hi Joerg, please have a look on it. Change target if needed. Frank
The issue is that the cursor-movement does not disable the selection. When moving to another cell by clicking or keystroke the selection is removed and remains with the currently selected cell only. This does not happen when recorded. The args args2(1).Name = "Sel" args2(1).Value = true are not set in this case. This worked in 5.2
accepting
code changes reviewed
Fixed in CWS calc12, will be in 1.1 RC. Changed files: sc/source/ui/view/gridwin.cxx 1.41.42.1 sc/source/ui/view/tabvwsh3.cxx 1.16.50.1
Back to QA for verification.
Changing Resolution back to fixed
found fixed on Solaris and Windows using cws calc12
OK in M5, will be in 1.1 RC. This issue is closed.