How to pass value between workbooks ?

[Guest]

I would like to pass value from cell A1 in workbook1, sheet1 to cell A2 in workbook2, sheet2 but not success. Could anyone give me the solution. Thank you very much.

 

[Colo]

Hi Chanon,

Workbooks("Book2.xls").Sheets("Sheet1").Range("A1").Value = _
Workbooks("Book1.xls").Sheets("Sheet1").Range("A1").Value

You can pass value like this.
--
Kind Regards
Colo
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
Colo of 'The Road of The Cell Masters'

URL:http://www.interq.or.jp/sun/puremis/colo/CellMastersLink.htm
mailto:[email protected]

/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

I would like to pass value from cell A1 in workbook1, sheet1 to cell A2 in

workbook2, sheet2 but not success. Could anyone give me the solution. Thank
you very much.

 

[Guest]

Hi, Col

I try many time for code like that you suggest me but it's not work. Error always shows " subscript out of range
Please anyone get me out another way for this solution. Thank you.

 

[Colo]

Hi Chanon,

May I ask you a question? Both workbooks must be opened before use this
code.
How is your case?


--
Kind Regards
Colo
/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
Colo of 'The Road of The Cell Masters'

URL:http://www.interq.or.jp/sun/puremis/colo/CellMastersLink.htm
mailto:[email protected]

/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

Hi, Colo

I try many time for code like that you suggest me but it's not work.

Error always shows " subscript out of range "