Computer Aided Automation
Read the value of a cell from another excel file without opening it - Printable Version

+- Computer Aided Automation (https://computeraidedautomation.com)
+-- Forum: CAA Discussions (https://computeraidedautomation.com/forum-7.html)
+--- Forum: VBA Programming (https://computeraidedautomation.com/forum-1.html)
+---- Forum: Excel VBA (https://computeraidedautomation.com/forum-2.html)
+---- Thread: Read the value of a cell from another excel file without opening it (/thread-18.html)



Read the value of a cell from another excel file without opening it - techberth - 23-11-2019

You have an excel file at location D:\ (example D:\fromdata.xlsx ) and you want to read its cell value E2 and put it inside the file located at C:\ (example C:\todata.xlsx )

Open your file at C:\todata.xlsx go to Developer Tab and then insert a button

copy below codes and paste between the Command Button click  (just below Button1_Click())

Dim wkbk1 As Workbook
Set wkbk1 = Workbooks.Open("D:\fromdata.xlsx")
Dim cellvalueofdatafile As Variant
cellvalueofdatafile = wkbk1.Sheets("Sheet1").Range("E" & 2)
wkbk1.Close

ThisWorkbook.Sheets("Sheet1").Range("A" & 1) = cellvalueofdatafile

[Image: excel%20automation%201.JPG]

now we have the cell value of E2 (of D:\fromdata.xlsx, Sheet1) in the variable cellvalueofdatafile which can be put it inside your file

A1 by using the formula ThisWorkbook.Sheets("Sheet1").Range("A" & 1) = cellvalueofdatafile

Save it as macro enabled file