按指定条件自动筛选数据

如下示例代码筛选 “性别” 字段内容为 “男” 的记录

Sub DataFilter()
    Worksheets("sheet1").Range("A1").AutoFilter _
        field:=2, Criteria1:="ÄÐ", Operator:=xlFilterValues
End Sub

代码解析：

• AutoFilter 方法应用于单个单元格时，Excel默认筛选区域为该单元格所在的当前区域，参数Field:=2,指定作为筛选基准字段（从左侧开始，最左侧的字段为第一个字段）的偏移量，此处表示在筛选区域的第2列。而参数Criteria1指定筛选条件为 “男” ， xlFilterValues代表筛选值