|
關(guān)于excel的Criteria1用法實(shí)例,，是結(jié)合VBA來使用的,，下面是關(guān)于Criteria1用法的幾個(gè)例子，希望對(duì)你有所幫助,。 Sub SimpleOrFilter() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=4,Criteria1:="=A", Operator:=xlOr, Criteria2:="=B" End Sub Sub SimpleAndFilter() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=4, _ Criteria1:=">=A", _ Operator:=xlAnd, Criteria2:="<=EZZ" End Sub Sub Top10Filter() ' Top 12 Revenue Records Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=6, Criteria1:="12",Operator:=xlTop10Items End Sub Sub MultiSelectFilter() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=4, Criteria1:=Array("A", "C", "E","F", "H"),Operator:=xlFilterValues End Sub Sub DynamicAutoFilter() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=3,Criteria1:=xlFilterNextYear,Operator:=xlFilterDynamic End Sub Sub FilterByIcon() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=6, _ Criteria1:=ActiveWorkbook.IconSets(xl5ArrowsGray).Item(5),Operator:=xlFilterIcon End Sub Sub FilterByFillColor() Worksheets("SalesReport").Select Range("A1").AutoFilter Range("A1").AutoFilter Field:=6, Criteria1:=RGB(255, 0, 0), Operator:=xlFilterCellColor End Sub
|
|
|
