Excel允许您在电子表格的页眉或页脚中插入许多不同的项目（如其他_ExcelTips_所示）。

不幸的是，您无法轻易添加的一项是电子表格文件的完整路径名。但是，可以使用以下宏将路径名添加到页眉或页脚：

Sub DoPath()

'   Inserts the file name and path in the footer '   of each worksheet in the active workbook     For Each sheet In ActiveWorkbook.Sheets         sheet.PageSetup.CenterFooter = ActiveWorkbook.FullName     Next sheet End Sub

要使用此功能，只需运行它，它会将电子表格文件的完整路径和文件名添加到页脚的中心部分。它为工作簿中的每个工作表执行此操作。如果要将信息添加到页脚或页眉中的其他位置，只需将宏的CenterFooter部分替换为以下之一：

LeftFooter，RightFooter，LeftHeader，CenterHeader或RightHeader。

如上所述，上面的宏更改了工作簿中每个工作表的页眉或页脚。如果只想更改当前工作表，则可以使用以下缩写的宏版本：

Sub DoOnePath()

'   Inserts the file name and path in the footer '   of the active worksheet     ActiveSheet.PageSetup.CenterFooter = ActiveWorkbook.FullName End Sub

您应注意，与您粘贴在页眉或页脚中的其他项目不同，这些宏插入的路径和文件名不是“动态的”。因此，如果将电子表格文件移动到其他目录或以其他名称保存，则需要再次运行宏。

尽管上述解决方案在所有版本的Excel中都可以正常工作，但是如果您使用的是Excel 2002，则应该知道，还有一种将路径名添加到页眉或页脚的简便方法。 Microsoft终于听到了用户的请求，并在“页眉和页脚”对话框中添加了一个按钮，使您可以插入工作簿的路径和文件名。请按照下列步骤操作：

。选择要更改其页眉或页脚的工作表。

。从文件菜单中选择页面设置。 Excel将显示“页面设置”对话框。

。确保已选择“页眉/页脚”选项卡。 （请参见图1。）

。根据需要单击“自定义页眉”或“自定义页脚”按钮。 Word将显示“页眉”或“页脚”对话框。 （请参见图2。）

。根据需要将插入点放置在“左侧部分”，“中央部分”或“右侧部分”框中。

。单击文件按钮。 （它看起来像一个伸出纸的文件夹。）Excel在插入点插入以下代码：

&[Path]&[File]

。当您打印工作表时，Excel分别用工作簿的路径名和文件名替换代码。

。单击确定两次以关闭两个对话框。

与本技巧前面提供的宏解决方案不同，Excel 2002中提供的新的页眉和页脚代码是动态的。如果重命名或重定位工作簿文件，则下次打印时，页眉或页脚中的信息将更改。

注意：

如果您想知道如何使用此页面（或_ExcelTips_网站上的任何其他页面）中描述的宏，我准备了一个特殊页面，其中包含有用的信息。

点击此处在新的浏览器标签中打开该特殊页面。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（2639）适用于Microsoft Excel 97、2000、2002和2003。