WorksheetBase.FilterMode Özellik

Makale
08/01/2011

Çalışma sayfası verileri etkin olarak filtre olup olmadığını gösteren bir değeri alır.

Ad alanı: Microsoft.Office.Tools.Excel
Derleme: Microsoft.Office.Tools.Excel.v4.0.Utilities (Microsoft.Office.Tools.Excel.v4.0.Utilities.dll içinde)

Sözdizimi

'Bildirim
Public ReadOnly Property FilterMode As Boolean
    Get

public bool FilterMode { get; }

Özellik Değeri

Tür: System.Boolean
true çalışma sayfası etkin olarak verileri süzme, Aksi takdirde, false.

Açıklamalar

(Yani, filtre açılan oklar çalışma sayfasında görüntülenip görüntülenmeyeceğini) filtre olup olmadığını belirlemek için şu anda etkin, kullanın AutoFilterMode özelliği.

Filtrelemeyi etkinleştirmek ve süzülmüş bir liste oluşturmak için kullanmak AutoFilter yöntemi bir Range nesne veya kullanmak AutoFilter yöntemi bir NamedRange nesne.

Bu özellik true çalışma sayfası varsa, var. gizli satırları süzülmüş liste

Örnekler

Aşağıdaki kod örneği fruits filtrelenmiş listesini oluşturur bir Range, sonra kullanır AutoFilter Filtre ölçütünü görüntüleme özelliğilistesi. Örnek daha sonra kullanarak filtreyi devre dışı bırakmak ister AutoFilterMode özelliği ve son olarak kullandığı FilterMode özelliğine görüntüleyip görüntülemediğini çalışma olan filtre uygulanmış bir liste.

Bu örnek, bir belge düzeyinde özelleştirme için bulunur.

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", missing].Value2 = "Fruits";
    this.Range["A2", missing].Value2 = "Banana";
    this.Range["A3", missing].Value2 = "Apple";
    this.Range["A4", missing].Value2 = "Banana";
    this.Range["A5", missing].Value2 = "Orange";
    this.Range["A6", missing].Value2 = "Apple";
    this.Range["A7", missing].Value2 = "Orange";

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

    NamedRange1.AutoFilter(1, "Apple",
       Excel.XlAutoFilterOperator.xlAnd, missing, 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");
    }
}

.NET Framework Güvenliği

Anında arayanlar için tam güven. Bu üye kısmen güvenilen kodla kullanılamaz. Daha fazla bilgi için bkz. kısmen güvenilir kod tarafından Kitaplıklar kullanma.

Ayrıca bkz.

Başvuru

WorksheetBase Sınıf

Microsoft.Office.Tools.Excel Ad Alanı

Aracılığıyla paylaş