Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Returns all customers that started with the letters A through E

Sub SimpleAndFilter()     Worksheets("SalesReport").Select     Range("A1").AutoFilter     Range("A1").AutoFilter Field:=4, _         Criteria1:=">=A", _         Operator:=xlAnd, Criteria2:="<=EZZ" End Sub