コピー元シートから指定してセル範囲を別シートにコピーする

A1:C5の内容を別シートのA1にコピー

 Sheets("コピー元").Range("A1", "C5").Copy _
   Destination:=Sheets("コピー先").Range("A1")

ネタ元

www.relief.jp