Vba 将文件从一张图纸复制并递增到另一张图纸

在表1中，我在第10行有一些数字。

我想把它们复制到第二张纸第三排

然后，第10行第1页中的编号发生变化

在第2页中，我需要增加第10行+1，并将第10行的新编号放入第1页

以此类推…11+1…12+1

---

谢谢你的帮助。）

这段代码可以满足你的要求。 您需要将其附加到某种命令按钮或快捷键上才能执行-

Public Sub MoveFigures()

    ThisWorkbook.Worksheets("Sheet1").Range("A10:C10").Copy _
        Destination:=ThisWorkbook.Worksheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Offset(1)

End Sub

---

你是说你总是需要将A10:C10范围复制到Sheet2的A列中的下一行吗？你有没有一些你尝试过的提示？没错，Kyle，谢谢你的回答