Copy a range of cells in an unopened workbook and paste it to the current workbook

  • Thread starter Thread starter topstar
  • Start date Start date
T

topstar

Help!

Can someone please help me with a macro to copy a range of cells fro
one unopened workbook, and paste it into the current sheet of a ne
opened workbook.

Thank
 
Hi Ron,

Thanks very much. I cut pasted the code from the snippet below, whic
you suggested. However, the macro gives the following error


Compile Error: Sub or Function not defined

at the line GetData

Any advise?

Cheers

----------------






Copy a range from a closed Workbook (filename in the code)

This example will not copy the Header row (the last argument = False)
Change it to True if you want to copy the header row also.
This example will copy the range from the file test.xls that is in th
same folder

Sub GetData_Example1()
'This Copy the range to the ActiveCell
GetData ThisWorkbook.Path & "\test.xls", "Sheet1", "A1:C5"
ActiveCell, False

'This Copy the range to the Sheet/Range you want
'GetData ThisWorkbook.Path & "\test.xls", "Sheet1", "A1:C5"
Sheets("Sheet2").Range("A1"), False

End Su
 
Back
Top