EXCEL如何平均分页？

发布网友发布时间：2022-03-01 19:04

共3个回答

热心网友时间：2022-03-01 20:33

如下图为VBA代码运行结果：

第一处分隔

之后的分隔结果

实现的具体VBA代码如下：

Sub 每隔50行分页()

Dim i As Integer

ActiveWindow.View = xlPageBreakPreview '跳转到分页视图

ActiveSheet.ResetAllPageBreaks '清空原有分页符

For i = 51 To [a65536].End(3).Row Step 50 '51表示从A51左上角插入分页符，50表示间隔

Range("A" & i).Select

ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell

End Sub

热心网友时间：2022-03-01 21:51

谢谢！

热心网友时间：2022-03-01 23:26

删除分页符

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com