how can i get data from an un_opened excel file using codes

[Guest]

i want to write codes to retrieve data from an unopened excel file. how can
get it? thanks a lot.

 

[Ron de Bruin]

Hi hf

See
http://www.rondebruin.nl/ado.htm

Or
http://www.rondebruin.nl/copy7.htm

 

[Guest]

HF,

You can try this one :

Sub TESTretrieve()
With Activeworkbook.sheets(1).range("A1")
.FormulaArray = "='C:\[Book1.XLS]Sheet4'!$A$1"
.Value= .Value
End With
End sub

note that file C:\Book1.xls is must be available .!