Cost-effective copying

Y

Yarroll

Hello,

I run a copy routine on the daily basis, involving hundreds of Excel files
over many hours (one file gets opened, a corresponding files opened, cells
copied, save and close, next). The macro contains the following lines:

With Workbooks.Open(nam_1)
.Worksheets(1).Cells.Copy Destination:= _
fil.Worksheets(myVal).Cells
.Close
End With


Do you think I would be able to speed up the whole process if I do not copy
Cells (whole sheets), but UsedRange? Or Range("A1:Z" & last cell)? Or use
Resize?
Thanks. All the best,
Yarroll
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Copying contents CSV-XLS 2
Copying CSV-XLS, large amounts-different folders 1
Pumping CSVs into XLSs at one go 2
code does not copy 2
err: copied formula has name that already exists, but I don't think does 1
copying cells with more then 255 characters to new workbook 4
copy/paste want to retain cell coloration but lose the conditional formatting source data 6
Locate non-blanks in a column and copy certain data from the row 1

Top