Hello All,

Could use some help with a macro. I have a workbook with 30+ worksheets. Each worksheet has a range of values, the columns are always the same but the number of rows are different for each sheet - hence dynamic range. What I need is a macro something like that:

- Go to Sheet 1
- Copy Range in Sheet 1 (currSheet)
- Paste in Sheet named "Query"
- Go to Sheet 2
- Copy Range in Sheet 2 (currSheet)
- Paste in Sheet "Query" BELOW the previous range that was pasted
---Rinse & Repeat for all worksheets in workbook----

So basically I would be making a list of the ranges in a sense (if that makes sense)

I get a "Subscript Out of Range" error at the copy/paste code line:

Worksheets(currSheet).Range("F2:H" & LastRow).Copy Destination:=Worksheets("Query").Cells(Rows.Count, "A").End(xlUp).Offset(1)
Prior to this line I have some code that loops through and does some formatting stuff on all sheets

Any advice/help would be much appreciated.

Can't seem to attach the workbook...is there a size limit on uploads?

Cheers.