Get data from any given filename

[Maagaard]

Hi,

I need to create a macro that can get data from any given workbook, into a given workbook.

My problem is, that the "source" workbook will not be the same from time to time, eventhough it follows the same structure. Is there a way to get data from any given workbook, that is open for example?

I'm thinking something like:

Workbook("destnation").Sheets("DestinationSheet").Cells(1, 1) = Workbook(open workbook).Sheets("Sheet1").Cells(2,3)

Is there a possible way to do this?

 

[xenou]

Hi,
You can access other open workbooks by number:

Workbooks("Destination").... = Workbooks(2)...

This isn't really a solution since I presume you still need to have some logic about which, precisely, other open workbook you want to access. If it is always the last workbook opened you could go with the count:
Workbooks(Workbooks.Count) ....

I think in general you really should have some more structure. There should be some way to identify the workbook you want to use other than just assuming its another open workbook (i.e., names ranges in the workbook, some pattern in the naming scheme, or some way for the user to do this (perhaps a userform that let's the user select the workbook to copy from in a listbox).

 

[xenou]

Hi,
You can access other open workbooks by number:

Workbooks("Destination").... = Workbooks(2)...

This isn't really a solution since I presume you still need to have some logic about which, precisely, other open workbook you want to access. If it is always the last workbook opened you could go with the count:
Workbooks(Workbooks.Count) ....

I think in general you really should have some more structure. There should be some way to identify the workbook you want to use other than just assuming its another open workbook (i.e., names ranges in the workbook, some pattern in the naming scheme, or some way for the user to do this (perhaps a userform that let's the user select the workbook to copy from in a listbox).