Here is part of my macro

'' Formatting Alan with color
Range("A1").Select
Application.CutCopyMode = False
ActiveWindow.DisplayGridlines = False
Selection.AutoFilter Field:=1, Criteria1:="Alan"
Selection.AutoFilter Field:=3, Criteria1:="=Alan"

''''''''''' why is the next line A2 ?
Range("A2").Select

''''''''''' Above line could be A20, how do How do I choose the rows that are filtered