LibreOffice 3.4 Calc Guide - The Document Foundation Wiki

After creating one or more sets of filter criteria, apply an advanced filter as follows:
1) Select the sheet ranges that contain the data to filter.
2) Use Data > Filter > Advanced Filter to open the Advanced Filter dialog (see Figure 321).
3) Select the range containing the filter criteria and any other relevant options. Click OK.
Applying an advanced filter using a macro is simple (see Listing 17). The cell range containing the
filter criteria is used to create a filter descriptor, which is then used to filter the range containing the
data.
Figure 321. Apply an advanced filter using a previously defined named range
Listing 17. Use an advanced filter.
Sub UseAnAdvancedFilter()
Dim oSheet 'A sheet from the Calc document.
Dim oRanges 'The NamedRanges property.
Dim oCritRange 'Range that contains the filter criteria.
Dim oDataRange 'Range that contains the data to filter.
Dim oFiltDesc 'Filter descriptor.
REM Range that contains the filter criteria
oSheet = ThisComponent.getSheets().getByIndex(1)
oCritRange = oSheet.getCellRangeByName("A1:G3")
REM You can also obtain the range containing the
REM filter criteria from a named range.
REM oRanges = ThisComponent.NamedRanges
REM oRange = oRanges.getByName("AverageLess80")
REM oCritRange = oRange.getReferredCells()
REM The data that you want to filter
oSheet = ThisComponent.getSheets().getByIndex(0)
oDataRange = oSheet.getCellRangeByName("A1:G16")
oFiltDesc = oCritRange.createFilterDescriptorByObject(oDataRange)
oDataRange.filter(oFiltDesc)
End Sub
Change properties on the filter descriptor to change the behavior of the filter (see Table 17).
308 LibreOffice 3.4 Calc Guide