Transferring data from multiple sheets

Hi folks

I have to following code:

Please Login or Register  to view this content.

the idea being that it transfers a varied range of data from one sheet into another - easy!

however, I have 9 different sheets that I want this to apply to and all data to get transferred into the FINAL sheet.

Any ideas how to simplify the code in order to do this?

I tried a FOR EACH code but got twisted round.

any help would be great.

TVM

Something like this:

Please Login or Register  to view this content.

Rewrite the reds

Thanks for the quick reply...however...

I get an 'Expected Array' error on the following line:

Please Login or Register  to view this content.

it specifically highlights the 'UBound'

ideas?

Hi Superdonk,

I should have declared SNames as Variant:

Please Login or Register  to view this content.