excel同一张内容打印多页，自动插入页码的方法
合集下载
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
excel同一张内容打印多页，自动插入页码的方法
查看文章
excel同一张内容打印多页，自动插入页码的方法
2011-04-19 17:07
整了一下午，终于把方法找到了，受到一篇文章的启发，特写此教程。
（让我受到启发的文章的链接：/56521649_d.html，深表感谢！）
一、确保默认打印机正确。
二、按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：
Sub test()
Dim i As Integer
For i = 1 To 8 ‘标记一'
ActiveSheet.PageSetup.RightFooter = i'标记二'
ActiveSheet.PrintOut
Next i
End Sub
三、直接按F5运行此宏
后记：标记一表示此处的数字可以修改，用于输入你想要的起始页码和结束页码。
标记二表示此处是在右下角输入页码，如果想要在页眉输出页码的话输入Right Header，其中Right是右边，Left左边，Center是中间，如果想显示成“第几页”的话就在=后面输入"第"& i & "页"。
如果想输入“第几页共10页”的话就把其改为"第"& i & "页共10页"。
（记住& i &在i之间必须有空格！还有双引号必须是英文状态的！）。