Copy Data to another sheet based on the Value

Theres no problem with the VBA, it's your sheet design. AutoFilter is not recognising the Header Rows, probably because there is no entry in Q1.

Originally Posted by Rajkumar

Dear Roy,
Thanks for the feedback.

I applied some dummy header in Q1,but still there seems to be problem.

It shows
Run-time error ‘1004’:
Method ‘Range’ of Object’ _Golbal failed.

When clicked Debug->
Sheets("Main").Range("A1").AutoFilter Field:=1, Criteria1:=Range("FindItem")

Any other alternative.Sorry for the trouble.

Rajkumar

The only trouble is this darn website keeps locking up,
Criteria1:=Range("FindItem")
FindItem is a named range, field 1 is the first column to be filtered, criteria1 is the first item to filter by,
If you want to use the name FindItem, you need to select the cell that you want to filter by, then go to insert,name,define, name that range FindItem, see what happens then

After looking at the worksheet I believe this will work, once you have located where to place the range
"FindItem"
this part needs to be changed to..

Please Login or Register  to view this content.

Here's your sample workbook,
There is a drop down menu in E1 I just use Column E from the main worksheet to get the list, you will have to make a list if you want to do it that way , use the drop down to select what you want filtered,

Your one post of just entering Sid in E1 does not make sense as there is no such word in the column