在辅助页面上使用其他页脚(Microsoft Excel)
创建最终将要打印的工作表时,您可能希望在文档的第一页上使用与在后续页面上不同的页脚。无法直接在Excel中执行此操作。
但是,可以使用几种解决方法。
首先,尝试使用Excel的报表管理器加载项。此加载项使您可以定义不同的视图并选择这些视图的打印顺序。每个视图还可以具有其唯一的页眉和页脚,这意味着您可以设置首页(具有所需的页脚)的视图,以及后续页面的页眉和页脚。然后,您将使用“报告管理器”打印报告,从而得到所需的输出。
您应该注意,报表管理器加载项最后一次与Excel 2002一起分发。如果您使用的是Excel 2003,则仍可以使用报表管理器。这篇知识库文章介绍了如何使用它:
http://support.microsoft.com/kb/873209
另一个解决方法是使用宏进行打印。下面的宏将根据要打印的内容设置工作表的页脚。实际上,它为第一页设置页脚,然后打印该页。然后,为其他页面设置页脚,并打印它们。
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培训的来源。
本技巧(2187)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: