Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Filters to show records

Sub SimpleFilter()     Worksheets("Sheet1").Select     range("A1").autoFilter     range("A1").autoFilter Field:=4, Criteria1:="=Agile Aquarium Inc." End Sub