Loop Horizontal (across) to copy and paste Vertically (Down)

Hi everyone,
I wanted to see if you guys could help me with a loop. I have a report that prints out across the sheet horizontally. I need it to show the data in a vertical layout instead. So this is what I know I need so far...start at J4 and move over 12 cells across and 4 down. So J4:V8... copy that and bring it down and paste it at A10. Then continue doing that 7 more times. So it needs to go to W4 and then go over 12 cells and down 4 and copy that and bring it under what was just pasted..so right at A16... then continue till it does this 7 times. Then i need it to do another loops after the 7th time (so it should start at DJ4, same concept but this time the loop would only go over 10 cells and down 4. It will need to do this one until it finds nothing else to copy (since this area is not fixed like the one above that has 7 items).

I was able to get this code but I haven't been able to make it work the way I want.

Please Login or Register  to view this content.

Maybe:

Please Login or Register  to view this content.

how can i do that? i will not let me attach a file.2016-04-28 11_09_17-Loop Horizontal (across) to copy and paste Vertically (Down) - Reply to Topi.png

Originally Posted by JOHN H. DAVIS

Maybe:

Please Login or Register  to view this content.

HI John,
for some reason it stopped at CV but CW still had data. So technically it needed to do the first part 1 more time. then do the second part where it looks over only 10 cells.

ExcelForum_Template (Loop).xlsx

Here you go Walrus! Thanks!

Originally Posted by rubenidas

HI John,
for some reason it stopped at CV but CW still had data. So technically it needed to do the first part 1 more time. then do the second part where it looks over only 10 cells.

Ok so i changed i=7 to i=8 and it completed the first part successfully. Oh and i also changes .copy to .cut so it would cut the data instead. But how do i get it to run the second part where it does the same but only for 10 cells across untill it finds nothing?

Originally Posted by JOHN H. DAVIS

Maybe:

Please Login or Register  to view this content.

Sorry, I missed the second part of your request.

Thanks John!, This worked perfectly!
You Rock!

You're welcome. Glad to help out and thanks for the feedback and the reps.