OpenOffoce 3.2です。
Calcで任意の範囲でオートフィルタを設定します。
そのオートフィルタの対象となっている範囲内で、データが無い行を含めてデータの並び替え(ソート)を行うと、オートフィルタが解除されてしまいます。
これはどうやら仕様のようですね。
オートフィルタ再設定用マクロとかを作っておいて、並び替えしたらそのマクロを動かすようにした方がいいかもしれません。
Dim oController As Object
Dim oSheet As Object
oController = ThisComponent.getCurrentController()
oSheet = ThisComponent.Sheets("シート名")
oController.select (oSheet.getCellRangeByName ("A1:D500"))
dispatcher.executeDispatch(document, ".uno:DataFilterAutoFilter", "", 0, Array())
最近寒くて冬眠中の三流PGでした。。
