Moving data to a closed workbook

I have tried to move data from my active WB to a closed one with the following

 Sub bouncey()

Cells.Select
    Selection.Copy
    Windows("Book1").Activate
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Documents and Settings\chris\My Documents\Book1.xlsx", FileFormat:= _
        xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWindow.Close

End Sub

but it returns an error on "Windows("Book1").Activate"

All help appreciated