若要在使用Excel 97和Excel 2000时在打印时将路径添加到页眉或页脚,请添加一个事件(宏代码行),该事件将自动导致信息(包括路径)出现在从工作簿打印的每张纸上。

要将路径添加到页眉或页脚:

{空} 1。通过按Alt + F11打开VBE(Visual Basic编辑器)。

2.在项目资源管理器中,双击ThisWorkbook模块。

3.从“对象”下拉列表中选择“工作簿”,然后从“过程”下拉列表中选择“ BeforePrint”(这两个下拉列表位于“模块”表的顶部)。

4.在事件过程中,在自动生成的开始和结束语句之间,键入以下代码:

ActiveSheet.PageSetup.LeftFooter =“&A&F&T&D”&ActiveWorkbook.Path字母A,F,T,D分别是工作表名称,工作簿名称,时间和日期。

当使用Excel 2002和Excel 2003时,代码行会更短(Z表示路径地址):

LeftFooter =“&A&F&T&D&Z”

屏幕截图//将路径地址添加到页眉/页脚