WorksheetBase.AutoFilterMode – vlastnost

Článek
01/03/2014

Získá nebo nastaví hodnotu, která označuje, zda filtrování je nyní povolena na listu (zda jsou právě zobrazeny rozevírací šipky filtru).

Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Deklarace
Public Property AutoFilterMode As Boolean

public bool AutoFilterMode { get; set; }

Hodnota vlastnosti

Typ: System.Boolean
true Pokud je aktuálně povoleno filtrování na listu. jinak false.

Výjimky

Výjimka	Podmínka
COMException	Tato vlastnost je nastavena na true.

Poznámky

Tuto vlastnost lze nastavit false Chcete-li zakázat filtrování (to znamená odebrat šipky rozevíracího seznamu filtru), ale nelze nastavit na true.Pokud chcete povolit filtrování a vytvořit filtrovaný seznam, použijte metodu AutoFilter objektu Range nebo metodu AutoFilter objektu NamedRange.

Tato vlastnost pouze označuje, zda je povoleno filtrování; To neznamená, zda všechna data, je filtrován.Chcete-li zjistit, zda listu aktivně filtrování dat, použijte FilterMode vlastnost.

Příklady

Následující příklad kódu vytváří filtrovaného seznamu ovoce v Rangea potom použije AutoFilter vlastnost zobrazit kritéria filtru pro seznam.Příklad poté vyzve uživatele k vypnutí filtru pomocí AutoFilterMode vlastnost a nakonec se používá FilterMode vlastnost, kterou chcete zobrazit, zda má list filtrovaného seznamu.

Tento příklad je pro přizpůsobení na úrovni dokumentu.

Private Sub ActivateAutoFilter()
    Me.Range("A1").Value2 = "Fruits"
    Me.Range("A2").Value2 = "Banana"
    Me.Range("A3").Value2 = "Apple"
    Me.Range("A4").Value2 = "Banana"
    Me.Range("A5").Value2 = "Orange"
    Me.Range("A6").Value2 = "Apple"
    Me.Range("A7").Value2 = "Orange"

    Dim NamedRange1 As Microsoft.Office.Tools.Excel.NamedRange = _
        Me.Controls.AddNamedRange(Me.Range("A1", "A7"), "NamedRange1")

    NamedRange1.AutoFilter(1, "Apple", Excel.XlAutoFilterOperator.xlAnd, _
        VisibleDropDown:=True)

    MsgBox("The current criteria for the AutoFilter is: " & _
        Me.AutoFilter.Filters(1).Criteria1.ToString())

    If Me.AutoFilterMode Then
        If DialogResult.Yes = MessageBox.Show("Would you like to " & _
            "turn off the filter?", "Example", MessageBoxButtons.YesNo) Then
            Me.AutoFilterMode = False
        End If
    End If

    If Me.FilterMode Then
        MsgBox("The worksheet has a filtered list.")
    Else
        MsgBox("The worksheet does not have a filtered list")
    End If
End Sub

private void ActivateAutoFilter()
{
    this.Range["A1"].Value2 = "Fruits";
    this.Range["A2"].Value2 = "Banana";
    this.Range["A3"].Value2 = "Apple";
    this.Range["A4"].Value2 = "Banana";
    this.Range["A5"].Value2 = "Orange";
    this.Range["A6"].Value2 = "Apple";
    this.Range["A7"].Value2 = "Orange";

    Microsoft.Office.Tools.Excel.NamedRange NamedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "A7"],
        "NamedRange1");

    NamedRange1.AutoFilter(1, "Apple",
       Excel.XlAutoFilterOperator.xlAnd, true);

    MessageBox.Show("The current criteria for the AutoFilter is: " +
        this.AutoFilter.Filters[1].Criteria1.ToString());

    if (this.AutoFilterMode)
    {
        if (DialogResult.Yes == MessageBox.Show("Would you like to " +
            "turn off the filter?", "Example", MessageBoxButtons.YesNo))
        {
            this.AutoFilterMode = false;
        }
    }

    if (this.FilterMode)
    {
        MessageBox.Show("The worksheet has a filtered list.");
    }
    else
    {
        MessageBox.Show("The worksheet does not have a filtered list");
    }
}

Zabezpečení rozhraní .NET Framework

Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.

Viz také

Referenční dokumentace

WorksheetBase Třída

Microsoft.Office.Tools.Excel – obor názvů

Sdílet prostřednictvím