Autofilter 包含标题行

在使用Autofilter时，通常需要包含数据表的标题行。以下是一种通过VBA代码实现Autofilter包含标题行的方法：

Sub AutoFilter_Include_Header()

    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1") '替换为你的工作表名称
    
    With ws
        .AutoFilterMode = False
        .Range("A1:D10").AutoFilter Field:=1, Criteria1:="North", Operator:=xlAnd
    End With
    
End Sub

上述代码在第一列添加了Autofilter，并包括了标题行到过滤范围内。注意：这里指定了具体的单元格范围，你需要替换为你的数据表范围。

此外，在上述代码中，你可以通过更改Criteria1的内容，来指定过滤的条件。例如，将Criteria1更改为"South"，则过滤器会只显示"Region"列包含了"South"的数据。

要使用此功能，请先把数据表设好格式，确保第一行为标题行。