Range("A1:L1").Select
Selection.Copy
Range("A3:L3").Select
ActiveSheet.Paste

works perfectly if you are copying range

for copiing whole line use

Rows("1:1").Select
Application.CutCopyMode = False
Selection.Copy
Rows("3:3").Select
ActiveSheet.Paste

*** Sent via Developersdex http://www.developersdex.com ***