Kopiering af celler i regneark via Macro

Hej,

Jeg har et lille problem med min macro:

ActiveWorkbook.RefreshAll         
    Sheets("Et varenummer").Select   
    Range("A1:N1").Select
    Selection.Copy                         
    Range("A3:A1000").Select               
    ActiveSheet.Paste                     
    Range("A1").Select                         
    Sheets("Udtræk Alle Varenumre").Select 
    Range("A1:AL1").Select                 
    Selection.Copy                       
    Range("A3:A20000").Select             
    ActiveSheet.Paste                     
    Range("A1").Select                     
 
    Sheets("Stamdata").Select               
    Range("E6:E7").Select               
    Selection.ClearContents               
    Range("E23:E24").Select               
    Selection.ClearContents               
    Range("A1").Select                   
    ActiveWorkbook.Save 

Mit problem er at kopieringen ikke sker. Jeg kan se at ctrl+c virker og at den markerer destinationen, men indsætter ikke noget.

Nogen gode ideer?
mvh Jens Peter