创建最终将要打印的工作表时，您可能希望在文档的第一页上使用与在后续页面上不同的页脚。没有直接在Excel中执行此操作的方法，但是您可以使用宏来完成任务。

下面的宏将根据要打印的内容设置工作表的页脚。实际上，它为第一页设置页脚，然后打印该页。然后，为其他页面设置页脚，并打印它们。

Sub PrintSheet()

Dim sP1Left As String     Dim sP1Center As String     Dim sP1Right As String     Dim sP2Left As String     Dim sP2Center As String     Dim sP2Right As String

' Define first-page footers     sP1Left = "First page left"

sP1Center = "First page center"

sP1Right = "First page right"



' Define second-page footers     sP2Left = "Second page left"

sP2Center = "Second page center"

sP2Right = "Second page right"



' Set up and print first page     With ActiveSheet.PageSetup         .LeftFooter = sP1Left         .CenterFooter = sP1Center         .RightFooter = sP1Right     End With     ActiveSheet.PrintOut 1, 1

' Set up and print other pages     With ActiveSheet.PageSetup         .LeftFooter = sP2Left         .CenterFooter = sP2Center         .RightFooter = sP2Right     End With     ActiveSheet.PrintOut 2 End Sub

要使用该宏，您需要做的就是更改页脚定义。

在“定义第一页页脚”区域和“定义第二页页脚”区域中更改变量值，以便仅获取所需的输出。

注意：

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

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

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

本技巧（11287）适用于Microsoft Excel 2007、2010、2013和2016。您可以在此处为Excel的较旧菜单界面找到此技巧的版本：

链接：/ excel-Using_a_Different_Footer_on_Secondary_Pages [在辅助页面上使用不同的页脚]。