variable equal to cell in another excel,file

[griffitd]

Hi

I'm after a line of code to make a variable equal to a cell value in another excel file.
i.e. somrthing like the following:

sValue = excelfile.xls.cells(r1c1)

Hope you can help thanks

 

[Rofeu]

Hi,

sValue = Application.Worksbooks("YourWB.xls").Cells(1,1).Value

Cheers,

Roel

 

[Rofeu]

make that Workbooks

 

[griffitd]

Thanks for the reply

when I run the code i get "subscript out of range error"

Dave

 

[rmikesmith]

Dave,

Whatever you have in place of 'YourWB.xls' is not the name of an open workbook; i.e. does not match any open workbooks.

Also, when you get that corrected, there needs to be a worksheet reference between the Workbooks and Cells identifiers. Example

sValue = Application.Worksbooks("YourWB.xls").Worksheets("Sheet1").Cells(1,1).Value

Regards,
Mike

 

[griffitd]

Mike

I don't reallly want to open the spreadsheet. Does it need to be open?

Dave

 

[griffitd]

Mike/Rofeu

The following works if I have the excel file open:

svalue = Application.Workbooks(sFileName1).Worksheets("Portrait").Cells(1, 1).Value

Can i get this to work without having it open.

Thanks

 

[rmikesmith]

Dave,

See John Walkenbach's article on retrieving cell values from closed workbooks (uses the old Excel macro language):

http://www.j-walk.com/ss/excel/tips/tip82.htm

Regards,
Mike

 

[griffitd]

Looks Good Thanks for the help