NamedRange.AutoFilter 方法

定义

命名空间:

Microsoft.Office.Tools.Excel

程序集:

Microsoft.Office.Tools.Excel.dll

使用“自动筛选”筛选列表。

public object AutoFilter (object Field, object Criteria1, Microsoft.Office.Interop.Excel.XlAutoFilterOperator Operator = Microsoft.Office.Interop.Excel.XlAutoFilterOperator.xlAnd, object Criteria2, object VisibleDropDown);

abstract member AutoFilter : obj * obj * Microsoft.Office.Interop.Excel.XlAutoFilterOperator * obj * obj -> obj

Public Function AutoFilter (Optional Field As Object, Optional Criteria1 As Object, Optional Operator As XlAutoFilterOperator = Microsoft.Office.Interop.Excel.XlAutoFilterOperator.xlAnd, Optional Criteria2 As Object, Optional VisibleDropDown As Object) As Object

参数

Field

Object

要使筛选器基于的字段的偏移量（从列表的左边算起；最左边的字段为字段 1（一））。

Criteria1

Object

条件（一个字符串；例如“101”）。 使用“=”查找空白字段，或使用“<>”查找非空白字段。 如果省略此参数，则条件为 All。 如果 Operator 为 xlTop10Items， Criteria1 则指定 (项的数目，例如“10”) 。

Operator

XlAutoFilterOperator

可以是以下XlAutoFilterOperator常量之一：xlOrxlAndxlTop10PercentxlBottom10ItemsxlBottom10PercentxlTop10Items将 xlAnd 和 xlOr 与 一Criteria2起使用Criteria1，以构造复合条件。

Criteria2

Object

第二个条件（字符串）。 与 和 Operator 一起使用Criteria1，用于构造复合条件。

VisibleDropDown

Object

如果对所筛选字段显示自动筛选下拉箭头，则为 true；如果对所筛选字段隐藏自动筛选下拉箭头，则为 false。 默认值为 true。

返回

Object

示例

下面的代码示例将单元格 A1 到 A5 设置为五个不同的名称字符串，然后使用 AutoFilter 方法筛选名称 "Robert"。

此示例适用于文档级自定义项。

private void SetAutoFilter()
{
    this.Range["A1"].Value2 = "Kathleen";
    this.Range["A2"].Value2 = "Robert";
    this.Range["A3"].Value2 = "Paul";
    this.Range["A4"].Value2 = "Harry";
    this.Range["A5"].Value2 = "George";

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

    namedRange1.AutoFilter(1, "Robert",
        Excel.XlAutoFilterOperator.xlAnd, true);
}

Private Sub SetAutoFilter()
    Me.Range("A1").Value2 = "Kathleen"
    Me.Range("A2").Value2 = "Robert"
    Me.Range("A3").Value2 = "Paul"
    Me.Range("A4").Value2 = "Harry"
    Me.Range("A5").Value2 = "George"

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

    namedRange1.AutoFilter(1, "Robert", _
        Excel.XlAutoFilterOperator.xlAnd, , True)
End Sub

注解

如果省略所有参数，此方法只会切换控件中自动筛选下拉箭头的 NamedRange 显示。

可选参数

有关可选参数的信息，请参阅 Office 解决方案中的可选参数。