下面我们就来看看在Excel VBA程序在打印工作簿之前创建一个页脚。

创建工作簿BeforePrint事件。添加到工作簿BeforePrint事件代码将被Excel VBA您打印工作簿之前执行。

1.打开Visual Basic编辑器。

2.双击该工作簿中的项目资源管理器。

3.从左边的下拉列表中选择工作簿。从右侧的下拉列表中选择BeforePrint。

Workbook BeforePrint Event in Excel VBA

4.要创建一个页脚,下面的代码行添加到工作簿BeforePrint事件:

ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName

注:PageSetup对象包含所有页面设置属性(左页脚,下边距,纸张大小,左边距,等等)的属性。

5.测试通过打印您的工作簿的程序。

结果:

Footer