"George Gee" wrote in message
...
I suppose it would help if I included the macro!

Range("A5:G5").Select
Selection.Insert Shift:=xlDown
Range("B3:F3").Select
Selection.Copy

For efficiency, you should take out as much physical selection as poss.
Forex, replace the last 2 lines with:

Range("B3:F3").Copy

Rgds,
Andy