OpenOffoce 3.2です。
Calcでオートフィルタを設定するマクロは、下記のようにすればいいようです。
Dim oController As ObjectDim oSheet As Object
oController = ThisComponent.getCurrentController()
oSheet = ThisComponent.Sheets(0)
'まずオートフィルタの範囲を選択します。(アクティブなセルを指定)
oController.select (oSheet.getCellRangeByName ("B3:M500"))
'オートフィルタ実行
dispatcher.executeDispatch(document, ".uno:DataFilterAutoFilter", "", 0, Array())
参考: