Hi
use:
xxx = Workbooks("book2.xls").Worksheets("sheet1").Range
("a1").Value

--
Regards
Frank Kabel
Frankfurt, Germany

coyote wrote:
Good morning,
What did I do wrong??

I have 2 files open in excel (1 instance). Book1 and
Book2. Running the following macro in Book1 results in an
error on the xxx line (Object doesn.t support this
property or method):

Sub test()

Dim xxx As String

xxx = Windows("book2").Worksheets("sheet1").Range
("a1").Value

End Sub