电子表格如何在EXCEL中编写有规律的复制粘贴代码

1.如何在EXCEL中编写有规律的复制粘贴代码

是将（A1:D1）复制到（A2:D2）吗？

这样的复制还是直接写源单元格复制以目标单元格的代码好了。

Sub Macro1()

Range("A1:D1").Select

Selection.Copy

Range("A2").Select

ActiveSheet.Paste

Range("A5:D5").Select

Selection.Copy

Range("A6").Select

ActiveSheet.Paste

Range("A9:D9").Select

Selection.Copy

Range("A10").Select

ActiveSheet.Paste

End Sub