在Excel电子表格中,如何进行每张页面只打印十行?

2024-11-16 15:45:15

推荐回答（2个）

回答1：

第一，如果行高相同，或者本身就是以10行为一个循环区域的，可以利用调整打印内容的到纸张的上下距离或者用自定义纸张来完成。
第二，如果行高有可能不同，仅仅只是每十行一页，那试试这个宏。
Sub AddHPageBreak()
ActiveSheet.ResetAllPageBreaks
For i = 11 To ActiveSheet.UsedRange.Rows.Count Step 10
ActiveWindow.SelectedSheets.HPageBreaks.add Before:=Cells(i, 1)
Next
End Sub

参考资料：http://www.excelba.com

回答2：

先把要打印的10行拖黑，点文件--打印区域---设置打印区域。OK