Saving a sort?

[DaveMoorman]

In Calc, I often sort by the same three columns, and it would be very handy to be able to save a sort, so I don't have to specify the columns/order for each sort. Is there a way to do this in OO? Thanks.

[RusselB]

Try looking at Tools - Options - OpenOffice Calc - Sort Lists

[DaveMoorman]

There is no "Options" option in my Tools menu.

[FJCC]

I think you can save the sort conditions by highlighting the data cells and then selecting the menu Data -> Define Range. Then do the sort and it will be remembered. To add data to the range, insert rows rather than appending data to rows below the range.

[Zizi64]

The AOO and LO can remember the parameters of the last sorting procedure automatically in a ODF type spreadsheet file. But you must select (to sort) precisely same cell range every time when you want to sort that range.

[Zizi64]

There is no "Options" option in my Tools menu.

Options (on Windows and Linux) = Preferences (on MAC)

[DaveMoorman]

Thanks for the quick replies.

Saving the data range would not work, because every time I sort, it's a different range (in the same spreadsheet). Inserting rows is about as cumbersome as specifying the sort order, because formulas would have to be copied or filled, etc. Excel remembered the sort order, which made it very easy. So far, that's all I miss from Excel.

[Zizi64]

Try to record or write one or more macro/s/ for this task.

[Zizi64]

Here is a recorded macro:

Code: Select all

sub Sort1
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(7) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ByRows"
args1(0).Value = true
args1(1).Name = "HasHeader"
args1(1).Value = true
args1(2).Name = "CaseSensitive"
args1(2).Value = false
args1(3).Name = "NaturalSort"
args1(3).Value = false
args1(4).Name = "IncludeAttribs"
args1(4).Value = true
args1(5).Name = "UserDefIndex"
args1(5).Value = 0
args1(6).Name = "Col1"
args1(6).Value = 2
args1(7).Name = "Ascending1"
args1(7).Value = false

dispatcher.executeDispatch(document, ".uno:DataSort", "", 0, args1())


end sub

The Macro Recorder was started AFTER selecting the desired range, therefore the macro will run of athe actual selected cell range. (You must select the range manually.)

[DaveMoorman]

Thanks, Tibor. Excellent suggestion and I'll try it out.