Autofilter using array as criteria = Run time error

[postelrich]

Hi, I have one master file where I need to split out and send data to 15 different regions. I've tried to make a macro to automate it by using autofilter and copy to achieve it but I keep getting a Run time Error 1004. I am using Excel 2007, my code below though I cut out the values for the string array. If I step into the code, the error pops up when I get to the filter by criteria line.

Please Login or Register  to view this content.

[romperstomper]

It should be Criteria1 rather than Criteria

[postelrich]

Oh pure genius! Now I get run time error 438 when it tries to paste!

[romperstomper]

Replace the .sheet1 with .sheets(1)

[postelrich]

Now I get the 1004 error again. Does it have anything to do with ws being set to workbook.add instead of workbook?

[romperstomper]

Which line is giving the error?

[postelrich]

.sheets(1).Paste

[snb]

Please Login or Register  to view this content.