Macro Copy & Paste data from 6 sheets to 1 new one

**eMeLI** · 10-19-2011, 07:08 AM

Every month 6 sheets get updated (new information is put in and old is automaticallty deleted) and I need to get the information out of the sheets to one new sheet.

The sheets are called Start(2), Start(3).....Start(7). In every sheet there is a header row which I don't need copied to the new sheet called "Results". The new sheet already has a header row in it.

So I need the data from Start(2) in Results and then I need the macro to find the next empty row and paste the information from Start(3) there, and so on....

I'm quite a noob at macro's so i've been doing everything with record macro, but i can't get this to work. In contrary to what it says in my details i use excel 2007 :D

Hope someone can help me here!!!

Thanks in advance.

**JBeaucaire** · 10-19-2011, 07:14 AM

Try this:

Please Login or Register  to view this content.

**eMeLI** · 10-19-2011, 07:19 AM

It gives an Run-Time 9 error

Subscript out of range

And it refers to:

For Each ws In Sheets(Array("Start(2)", "Start(3)", "Start(4)", "Start(5)", "Start(6)", "Start(7)"))