Hi,
I'm doing a search on 65000 rows and I wonder if there are alternatives CriteriaRange to the code posted.
Here is an example of the criteria with the data to searchCode:Sub Test() Range("A2:C31").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "A34:C44"), CopyToRange:=Range("A47:C47"), Unique:=False End Sub
Attachment 170
Bookmarks