Excel 每页的打印范围

如何更改每页的打印面积

我想做的是：手动在“分页符预览”中，我可以重新定位页面之间的行，为我重新定义每页的区域。我想做它从vba代码。可能吗

我的例子是：我在excel中有表格，这些表格是由代码创建的，这意味着这些表格中的行数可以不同。我希望将整个表放在一个页面中，而不是像现在这样分割，因此我将检查表的结尾，并希望在所有表和页面的循环中将页的结尾重新定位到这些行

---

谁能帮帮我吗

好的，我找到了我需要的。如果有人感兴趣，这就是主要观点：

Sub SetPageBrake()

    ActiveWindow.View = xlPageBreakPreview
    Worksheets(1).ResetAllPageBreaks
    ActiveWorkbook.PageSetup.PrintArea = 'Put here some range

With 'worksheet
    Set .HPageBreaks(1).Location = .Range("A40") 'The page break will be above the cell
    Set .HPageBreaks(2).Location = .Range("A98")
End With

    ActiveWindow.View = xlNormalView

End Sub

---

谢谢所有试图帮忙的人。对于那些为我的名誉而把负号放在哪里甚至找不到答案的人来说，这是一种耻辱。

有可能的，请查看

工作表。PageSetup

；请注意，

PageSetup

&分页符API相当脆弱，因此您需要在分页符之前的模式下操作分页符。有代码吗？很遗憾，我没有找到如何实现工作表.PageSetup，但我找到了VPageBreaks，我将尝试执行类似的操作：或此：谢谢@MathieuGuindon！