Eine der langjährigen Beschwerden über Excel ist, dass es keine sehr robuste Methode zum Erstellen und Verwalten von Kopf- und Fußzeilen gibt.

Stellen Sie sich das folgende Szenario vor: Sie möchten Ihr Arbeitsblatt drucken, haben jedoch nur Seitenzahlen, die auf der zweiten Seite beginnen.

In Excel gibt es keine intrinsische Methode, um mit dieser Situation umzugehen. Es gibt einige Problemumgehungen. Sie können beispielsweise Ihre erste Seite in ein Arbeitsblatt (ohne Kopf- oder Fußzeilen) und die nachfolgenden Seiten in ein anderes Arbeitsblatt (einschließlich Kopf- und Fußzeilen) einfügen. Sie können dann die beiden Arbeitsblätter in einem Durchgang drucken und Ihr Ziel effektiv erreichen.

Wenn Sie möchten, können Sie ein Makro erstellen, das Ihr Arbeitsblatt nach Ihren Wünschen druckt. Das folgende Makro, GoodPrint, druckt die erste Seite eines Arbeitsblatts ohne Kopf- oder Fußzeilen und dann alle nachfolgenden Seiten wie gewohnt.

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

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (12101) gilt für Microsoft Excel 2007, 2010, 2013 und 2016.

Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Selektive Kopf- und Fußzeilen.