Hi Jentan,

Try:
'=============
Public Sub Tester()
Dim srcRng As Range
Dim destRng As Range

Set srcRng = Range("A1:E1")
Set destRng = Range("A2")

srcRng.Copy Destination:=destRng
End Sub
'<<=============

To find appropriate syntax, try turning on the macto recorder while you
perform the operation.manually. Whilst recorder code is rarely optimised
code, it will provide you with a syntactical solution,


---
Regards,
Norman



"Jentan" wrote in message
oups.com...
Anyone out there can teach me how to copy a range(say row A1 - E1) to
row A2-E2 using the range command.
thanks