粘贴项目时移动页面

Question

首先很抱歉不包括我尝试的任何代码，因为我甚至不知道从哪里开始试用编码。我想要做的是我有一张表格，我预先格式化为我的报告。然后，我使用宏将某些列从一个工作表复制到报表工作表。我需要报告表格，由业务中的某人进行烧录，因此需要最下面的几行。我的问题是如何将粘贴的列粘贴到下一张纸上，如果它们到达我认为是我想要任何信息的最后一行的行。我为这个非常模糊的问题道歉，所以如果您需要更多信息，请提出问题。

Answer 1

循环水平分页符。这样的事情。

For x = 1 To .HPageBreaks.Count - 1

    MsgBox .HPageBreaks(x).Location.Row

    'Write your rows adding your "sheet" row value to the pagebreak rows.
    ws.Range("D" & lRow + .HPageBreaks(x).Location.Row).Value = "SomeValue"

Next