VBA Copy values of last 20 worksheets

[nickmangan]

Hi
I would be grateful for your help. I have a workbook that contains 25 individual worksheets, the first five of which are called "calc1 to 5" I need to be able to export/copy the values of each of the last 20 worksheets, the first one is positioned after the worksheet "calc5" to another workbook with the same worksheet names.

Grateful for your help.

Thanks

Nick

[AlphaFrog]

Try this...

Please Login or Register  to view this content.

[TMS]

One way:

Please Login or Register  to view this content.

Regards, TMS

[TMS]

Just be wary of using the Sheet Index to select and copy the sheets. The order of the sheets will depend on whether or not the sheets have been moved around.

For example:

Please Login or Register  to view this content.

Output (in the Immediate Window):

Please Login or Register  to view this content.

In this example, Sheet5 was dragged to the first position, Sheet3 was dragged between Sheet1 and Sheet2 and it was renamed as Sheet7.


Regards, TMS