VBA--Help! Combining several work sheets into one

[capwork]

I have about 100 worksheets and I want to combine them into one. All the first rows should be together and so as all the second rows etc.
For example,

sheet1
a a a
b b b
c c c

sheet2
aa aa aa
bb bb bb
cc cc cc

The result is:

sheet3
a a a
aa aa aa
b b b
bb bb bb
c c c
cc cc cc

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

[capwork]

Hi John,

Thanks a lot for your help, but when I run the code, it always skip the first row of every sheet, can you modify it for me?
In addition, my first active worksheet is not always called "Sheet1", can you make it work for any name of the first active worksheet?

Thanks a lot!

[JOHN H. DAVIS]

Sure. What will be the actual name of the destination Sheet?

[capwork]

Hi John,

I have more than 100 sheets and I want the code to work for any situation, so the name of the first and destination sheet can be various

[JOHN H. DAVIS]

How would you know which sheet to copy the data to? Do you want it to be created automatically with the code? You'd have to know that or else it would be excluded when the macro copies the data and you could wind up with duplicate rows.

[JOHN H. DAVIS]

This version will allow you to designate a Sheet.

Please Login or Register  to view this content.

[capwork]

Hi John,

That works perfectly, Thanks again for you help!

[JOHN H. DAVIS]

You're welcome. Glad to help out and thanks for the feedback. Please comply with Forum Rule No. 9.

9. Acknowledge the responses you receive, good or bad. If your problem is solved, please say so clearly, and mark your thread as Solved: Click Thread Tools above your first post, select "Mark your thread as Solved". Or click the Edit button on your first post in the thread, Click Go Advanced, select [SOLVED] from the Prefix dropdown, then click Save Changes. If more than two days have elapsed, the Dropdown option or Edit button will not appear -- ask a moderator to mark it.