filter data from one workbook and paste in other workbook

[forquaidian]

Hi Everybody!

I have three workbooks named book1, Book2 and Book3. Book1 is master while Book2 & Book3 are Secondar. Each Book has 12 sheets named S1 to S12 (there are other sheets as well). All Sheets have same Column Headers and data rows started from row 5.

I want to filter entire row data based on certain criteria from book1 field 22 (criteria1 and Criteria2 that is there are two types of values) and copy that data for criteria1 into book2 and for criteria2 into book3 and ofcourse into respective sheets.

I have recorded a macro;

Windows("Book1.xlsm").Activate
Sheets("S1").Select
Rows("4:4").Select
Selection.AutoFilter
ActiveSheet.Range("$B$4:$CC$4").AutoFilter Field:=22, Criteria1:="75"
Rows("5:200").Select
Selection.Copy
Windows("Book2.xlsm").Activate
Sheets("S1").Select
Rows("5:5").Select
ActiveSheet.Paste

Regards
Rahat

[forquaidian]

Hi dear

thank you for your reply.

Here is the tag;

Please Login or Register  to view this content.

Thank you.

[forquaidian]

can somebody help me?