Question

Excel 利用VBA 复制模版内容到另一工作表,每次运行宏粘贴的内容自动下移

黄色部分为复制区域

把复制的区域粘贴到sheet1中

每次运行宏粘贴到sheet1中的区域不覆盖，即第一次运行宏与第二次运行宏之间的粘贴距离为12行

就像sheet3工作表中展示的那样

谢谢！

Answer 1

Sub Macro1()
Sheet1.Rows("1:12").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheet2.Rows("1:12").Copy
Sheet1.Rows("1:1").Select
ActiveSheet.Paste
End Sub

直接复制过去就可以用了，根据第二张表数据行数的不同可以改第四行的12

追问

谢谢你之前的回答，你可能误解我的意思了，能不能留下联系方式，我发附件给你。

追答

我的qq316439702

Answer 2

Sub xxx()
Sheet2.Rows("1:29").Copy
Sheet1.Cells(Sheet1.[A60000].End(xlUp).Row + 13, 1).Select
ActiveSheet.Paste
End Sub

描述不是很清晰，也看不到sheet3，只能猜测你要的答案。
其中，1:29是假设黄色部分为1到29行。