Excel VisualBasic Script

Sub copy()
     range("A1:B3").copy Destination:=range("G4")
End Sub