16
Moderator
#1
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
Reply


0
Junior Member
#2
dulcolax online kaufen dulcolax kaufen schweiz dulcolax kaufen deutschland
bupropion kaufen ohne rezept wellbutrin online kaufen wellbutrin kaufen
clomid kaufen schweiz clomid kaufen österreich clomid kaufen deutschland
meloxicam kaufen rezeptfrei meloxicam rezeptfrei kaufen meloxicam 15 mg kaufen
tadalafil 20 mg rezeptfrei bestellen tadalafil kaufen ohne rezept tadalafil kaufen ohne rezept
sildenafil generika kaufen sildenafil rezeptfrei österreich sildenafil 20 mg kaufen
vardenafil 40 mg kaufen vardenafil kaufen schweiz levitra ohne rezept apotheke
vardenafil online rezept levitra generika rezeptfrei deutschland levitra 5mg kaufen
tadalafil 10mg kaufen ohne rezept tadalafil rezeptfrei österreich tadalafil cialis ohne rezept
meloxicam al 15 mg kaufen meloxicam 7 5 mg rezeptfrei kaufen meloxicam online kaufen
clomid bestellen ohne rezept clomid kaufen schweiz clomid generika kaufen
sildenafil in der schweiz kaufen sildenafil rezeptfrei in deutschland sildenafil online kaufen
propranolol rezeptfrei propranolol kaufen rezeptfrei propranolol kaufen rezeptfrei
isotretinoin ohne rezept kaufen isotretinoin tabletten rezeptfrei accutane kaufen ohne rezept
tamoxifen kaufen ohne rezept tamoxifen 20 kaufen tamoxifen tabletten kaufen
Reply



Forum Jump:


Users browsing this thread:
1 Guest(s)