マクロ/Calc/ba027

    From The Document Foundation Wiki
    < Macros‎ | Calc
    This page is a translated version of the page Macros/Calc/ba027 and the translation is 100% complete.


    Other languages:

    概要

    このページでは、空のフィルタを設定することによって現在のシートフィルタを削除するLibreOffice Basicマクロプロシージャを提供します。 7.0 Calc ガイドの第 13 章 ("データベースとしての Calc") から引用した例です。

    説明

    フィルタをシートに適用すると、そのシートの既存のフィルタが置き換えられます。したがって、シート内のフィルタを削除するには、そのシートに空のフィルタを作成して設定するだけです。 (次のコードを参照)

    Code

    Sub RemoveSheetFilter()
      Dim oSheet          ' フィルターが含まれるシート。
      Dim oFilterDesc     ' フィルター記述子。
      
      oSheet = ThisComponent.getSheets().getByIndex(0)
      oFilterDesc = oSheet.createFilterDescriptor(True)
      oSheet.filter(oFilterDesc)
    End Sub

    この Calc spreadsheet には上記の LibreOffice Basic コードが含まれています。