EXCEL VBA - Kopiowanie z pliku jednego wiersza makro błąd 400

Question

Witam

Mam plik, który ma tylko jeden wiersz danych. Próbuję z niego przekopiować ten kawałek danych, ale niestety wyskakuje błąd nr 400. Co może być problemem?

 Set CopyFromWorkbook = Workbooks.Open(FileName:=nazwa5)
    Set CopyFromWorksheet = CopyFromWorkbook.Worksheets(1)
    With CopyFromWorksheet
    .Range(.Range("a2"), .Range("a2").End(xlDown).End(xlToRight)).Copy
    End With
   Range("A" & Cells.Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
   CopyFromWorkbook.Close savechanges:=True