excel中满足条件插入分页符请教各位大虾

A1
1
2
3
4
5
1
2
1
2
3
1
2
3
4
我的表大概是这样 我想在A1=1的行上插入分页符改怎么做 谢谢

可以用vba完成。
下面的代码将判断当前工作表A列的数值，如果是1则在该单元格上方增加一个分页符。

PS:使用方法
按住ALT，依次按F11,I,M
粘贴下面的代码至右侧窗口后按F5运行。

================================
Sub 分页()
For I = 2 To [A65536].End(xlUp).Row
If Cells(I, 1) = 1 Then ActiveSheet.HPageBreaks.Add BEFORE:=Cells(I, 1)
Next
End Sub

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/47vvs4vs.html