Sub InsertPB() '插入 i0 = 20 '初始行 For i = 0 To Int((1048576 - i0) / 58) ActiveSheet.HPageBreaks.Add Before:=Cells(i * 58 + i0, 1) Next End Sub Sub DeletePB() '删除 ActiveSheet.ResetAllPageBreaks End Sub
Sub InsertPB() '插入 i0 = 20 '初始行 For i = 0 To Int((1048576 - i0) / 58) ActiveSheet.HPageBreaks.Add Before:=Cells(i * 58 + i0, 1) Next End Sub Sub DeletePB() '删除 ActiveSheet.ResetAllPageBreaks End Sub
按C列不同来分页，可以使用【分类汇总】功能，如下图： 当然VBA编程是万能的，录制一个插入分页符的宏，然后添加循环代码插入所有即可。
操作方法：1、透视表，但仍然改变了原表的格局，重新编辑起表头来很麻烦； 2、利用分类汇总功能实现批量插入分页符，且其结果不影响原始数据结构，没有分类汇总的迹象，只剩按具体字段项内容批量插入分页符即可。
首先选中你要进行分页的行1、对于2003版本的excel如下操作 插入—分页符 2、对于2007以上版本的excel如下操作 页面布局—分隔符—插入分页符
您可以按照以下步骤操作： 1.纵向 / 横向设置：单击“页面布局”选项卡，单击“页边距”，选中最下面的“自定义边距”，在弹出的“页面设置”中可以选中“纵向”或“横向”； 2.分页的页边距设置：然后进入“页边距”设置上、下、左、右的边距大小； 3.所以页...
1、进入"视图"选项卡，单击"工作簿视图"选项组中的"分页预览"; 2、上图"分页预览"中只有2页，分别是"第1页"和"第2页"。我们将光标移动右下角边框处，当鼠标变成双箭头时，按住左键不放，拖动边框，直到看见"第3页"和"第4页"的时候就放开鼠标;(如...
用vba可以啊，顺带教大家一个利用记录宏来做vba的方法。 第一步：点击开发工具-记录宏。如图： 第二步：选择单元格A10,点击页面布局-插入分割符。如图： 第三步：点击停止记录宏。得到宏代码如下： 第四步：在宏1的基础上进行代码改造。任务要求...
得用到VBA编程。 这里有一个和你的问题类似的帖子，可以参考一下： 如何在2000行的工作表中自动插入分页符？ http://club.excelhome.net/dispbbs.asp?BoardID=3&ID=47542&replyID=&skin=0 如果附件不能下载，可能要注册一下。 不用担心，这是一...
快捷键为B 打开excel文档，选中要编辑或打印的工作表。 2.在功能区域“视图”选项卡上的“工作簿视图”组中，单击“分页预览”。 3.然后会出现“欢迎使用分页预览”对话框，单击“确定”。如果不想在每次转到分页预览视图时都出现这个对话框，勾寻不再显示...