关于Excel的长期抱怨之一是它没有一种非常健壮的方法来创建和管理页眉和页脚。

请考虑以下情形:您要打印工作表,但页码只能从第二页开始。

Excel中没有内部方法来处理这种情况。有一些解决方法。例如,您可以将第一页放在一个工作表上(不包含页眉或页脚),而将后续页放在另一个工作表上(包括页眉和页脚)。然后,您可以一次打印两个工作表,并有效地实现您的目标。

如果愿意,可以创建一个宏,该宏可以根据需要打印工作表。下面的宏GoodPrint将打印不包含页眉或页脚的工作表的第一页,然后照常打印所有后续页。

Sub GoodPrint()

Dim hlft As String     Dim hctr As String     Dim hrgt As String     Dim flft As String     Dim fctr As String     Dim frgt As String

'save current header     hlft = ActiveSheet.PageSetup.LeftHeader     hctr = ActiveSheet.PageSetup.CenterHeader     hrgt = ActiveSheet.PageSetup.RightHeader

'save current footer     flft = ActiveSheet.PageSetup.LeftFooter     fctr = ActiveSheet.PageSetup.CenterFooter     frgt = ActiveSheet.PageSetup.RightFooter

'remove header and footer     With ActiveSheet.PageSetup         .CenterHeader = ""

.RightHeader = ""

.LeftHeader = ""

.CenterFooter = ""

.RightFooter = ""

.LeftFooter = ""

End With

'print page one     ActiveSheet.PrintOut 1, 1

'restore header and footer     With ActiveSheet.PageSetup         .LeftHeader = hlft         .CenterHeader = hctr         .RightHeader = hrgt         .LeftFooter = flft         .CenterFooter = fctr         .RightFooter = frgt     End With

'print the rest of the pages     ActiveSheet.PrintOut 2 End Sub

注意:

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

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

本技巧(12101)适用于Microsoft Excel 2007、2010、2013和2016。您可以在此处为Excel的较早菜单界面找到此技巧的版本:

链接:/ excel-Selective_Headers_and_Footers [选择性的页眉和页脚]。