I think you can do some ADO stuff, but it's beyond me.

But your code could open the workbook, copy and paste the range and close the
workbook. You'd never know that it happened.

Dim wkbk as workbook
dim actwks as worksheet

set actwks = activesheet

application.screenupdating = false
set wkbk = workbooks.open(filename:="c:\somefile.xls", readonly:=true)
wkbk.worksheets("Sheet2").range("a1:B99").copy _
destination:=actwks.range("A1")
wkbk.close savechanges:=false
application.screenupdating = true







Gazz_85 wrote:

is there anyway to do this without both workbooks being open??

"Dave Peterson" wrote:

Both workbooks need to be open.

workbooks("someotherworkbook.xls").worksheets("She et2").range("a1:B99").copy _
destination:=activesheet.range("A1")



Gazz_85 wrote:

What code would i have to put in so that everytime you clicked a button a
macro would automatically pull data from another excel sheet and drop it into
my workbook so i can do calculations with it???

Cheers

--

Dave Peterson


--

Dave Peterson