Daten kopieren

Hallo
ich habe folgendes Problem. Ich versuche Daten in eine von einem Makro geöffneten Datei zu  _
kopieren.
Das Makro läuft vollständig durch, kopiert die Daten aber nicht in den geöffneten File. Wenn  _
ich Manuell in den geöffneten File gehen und strg+v drücke kopiert er die Daten => Daten sind im Speicher.
Der Makroteil sieht folgender maßen aus:
Masterlist.Activate        'Original Datei inder dieser Quelltext steht
Sheets(Departments).Activate
Range(Cells(1, 1), Cells(5000, 30)).Copy
DataList.Activate       'Eine Datei, die als "Datenbank" dienen soll
ActiveWorkbook.Sheets("FW" & FWeek & "-" & Halfweek).Activate 'Funktioniert
Cells(1, 1).Select              'Funktioniert
ActiveSheet.Paste       'keine Fehlermeldung aber auch kein Einfügen der Daten
Kann mir jemand helfen?
Gruß
Dirk