Range.Copy (Excel)

Copia el rango en el rango especificado o en el Portapapeles.

Copy (Destination)

Destination: Especifica el nuevo rango en el que se copiará el rango especificado.

Worksheets("Sheet1").Range("A1:D4").Copy _ 
    destination:=Worksheets("Sheet2").Range("E5")