Workbooks("test2.xls").Worksheets("sheet1").Range("n:n") = _Workbooks("test1.xls").Worksheets("sheet3").Range("f:f").Value