Hello Folks, The following code works just fine. However, I have a lot of files and a lot of data to move and I would like to know if this can be accomplished more quickly than with the following methods. Workbooks.Open Filename:="D:\Documents and Settings\David\Desktop\table.csv" Range("A1:G4000").Copy ThisWorkbook.Worksheets("Sheet3").Range("H200").PasteSpecial Paste:=xlValues Workbooks("table.csv").Close Thank you, David

If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.

Speed up data copy from .csv files

Thread starter davidam
Start date Jul 25, 2011

davidam

Active Member

Jul 25, 2011

Hello Folks,
The following code works just fine. However, I have a lot of files and a lot of data to move and I would like to know if this can be accomplished more quickly than with the following methods.

Code:

Workbooks.Open Filename:="D:\Documents and Settings\David\Desktop\table.csv"
Range("A1:G4000").Copy
ThisWorkbook.Worksheets("Sheet3").Range("H200").PasteSpecial Paste:=xlValues
Workbooks("table.csv").Close

Thank you,
David