Excel每页中如何只打印固定行数
1、如下一份Excel表格,页数众多且每行内容并不相同,由于生产所需,需要对该Excel表格进行打印每页都有表头并且每页只打印20行

3、完成上述设置后,依次单击“开发工具>录制宏”;

5、完成上述操作后,单击菜单中的“停止录制”;

7、在打开的宏编辑对话框中将下述代码粘贴到宏编辑对话框中;Sub 分页()Dim i, k As Integerk = Range("a65536"稆糨孝汶;).End(xlUp).RowFor i = 4 To kIf i Mod 20 = 0 Then '当20行 分页Cells(i + 1, 1).SelectActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell End IfNextEnd Sub

9、完成上述操作后单击宏,在宏对话框中选择上步骤中编辑好的宏“分页”选择“执行”;

11、此时页面设置自动收缩,鼠标变成向右的箭头,此时选择标题行;

13、完成上述操作后在页面设置对话框中单击“确定”;
