Thanks for this, I'm just copying all the sheets to one single workbook.
When i try to run this though, I get a Run-time error '438' message with the line:
Sheets(i).Cells.Copy
highlighted on the debug
G.
I currently have an Excel macro that copies a whole sheet from a workbook into a new workbook, but pastes the values only, and then formats them to fit, ready for e-mailing:
Worksheets("Sheet1").Copy
z = ActiveSheet.Name
ActiveSheet.Range("A1:K250").Copy...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.