How could i simplify this macro?


Range("P389").Select
Windows("dagrapport-week-52.xls").Activate
Range("E6").Select
Selection.Copy
Windows("afrekening december2006.xls").Activate
ActiveSheet.Paste
Range("P390").Select
Windows("dagrapport-week-52.xls").Activate
Range("F6").Select
Selection.Copy
Windows("afrekening december2006.xls").Activate
ActiveSheet.Paste


Thanks in Advance,

Kindly regards