如何在excel中用vba插入删除分页符?





在excel中如果要调整打印的页面,会需要用到分页符。

分页符有水平和垂直分页符两种。

水平分页符会把打印区域分隔成上下部分,垂直分页符会把打印区域分隔成左右部分。

通过“视图”选项卡下的“分页预览”可以清楚的看到当前打印区域所具有的分页符。

当没有手动添加任何分页符时,系统会默认添加自动的分页符。

在vba中可以通过Range.PageBreak属性设置分页符,也可以使用HPageBreaks或者VPageBreaks集合添加分页符。

还可以通过工作表对象的ResetAllPageBreaks方法重置所有分页符。

当用工作表对象的ResetAllPageBreaks方法重置所有分页符时,excel会自动根据工作表的内容添加多个自动的分页符,自动分页符显示成蓝色的虚线,当手动插入分页符后,分页符会显示成蓝色的实线。

其中手动分页符,可以使用VPageBreak对象的Delete方法删除,自动分页符无法使用Delete方法删除,需要用DragOff方法删除。

当用DragOff方法删除自动分页符时,模拟的是用手动拖动自动分页符到打印区域外的方法。

它的语法如下:

其中Direction参数为要拖动的方向,RegionIndex为打印区域的编号,如果打印区域是连续的单元格,则RegionIndex为1,如果打印区域是非连续的单元格区域,则RegionIndex需要根据情况填写。

如下代码是一些操作分页符的通用代码:

 

打赏
       

发表评论