I have the following code -

Private Sub Search_Clothing_Click()

Worksheets("Sheet1").Range("DP:DP").AutoFilter _
field:=1, _
Criteria1:=clothing.Text

'This performs the filter on any text that is in the Clothing text field

End Sub

When i run the search it works fine, but the user cannot see the filtered
cells withour scrolling left or right. Can i add a line which says go to DP
so that the row appears in the top left of the screen? I am sure this is easy
but i can't get my head round the syntax. Any help?