Ian stellt Excel-Arbeitsmappen zusammen, die normalerweise mindestens 30 Arbeitsblätter enthalten. Jedes gedruckte Arbeitsblatt benötigt mindestens acht Seiten. Ian aktualisiert häufig Daten in jedem Arbeitsblatt, die auf den ersten beiden gedruckten Seiten dieser Arbeitsblätter erscheinen. Wenn es Zeit zum Drucken ist, möchte Ian nur die ersten beiden Seiten jedes Arbeitsblatts drucken.

Wenn Sie einen Bereich von Arbeitsblättern auswählen und dann drucken, werden diese Arbeitsblätter von Excel als einzelner, zusammenhängender Druckauftrag betrachtet.

Wenn Sie beispielsweise 20 Arbeitsblätter ausgewählt haben und für jedes Arbeitsblatt acht Seiten erforderlich sind, wird dies von Excel nicht als 20 einzelne Druckaufträge mit jeweils acht Seiten behandelt, sondern als einzelner Druckauftrag mit 160 Seiten.

Theoretisch können Sie im Dialogfeld Drucken angeben, dass Sie die Seiten 1, 2, 9, 10, 17, 18 usw. drucken möchten. Dies ist jedoch fehleranfällig und recht langwierig. Noch schwieriger wird es, wenn die gedruckten Arbeitsblätter aus einer unterschiedlichen Anzahl von Seiten bestehen.

Die beste Lösung besteht darin, ein Makro zu schreiben, das den Druck für Sie übernimmt.

Das Makro kann jedoch durch so viele Arbeitsblätter gehen, die Sie ausgewählt haben, und nur die ersten beiden Seiten jedes dieser Arbeitsblätter drucken. Das folgende Makro implementiert diese Technik:

Sub PrintTwoPages()

Dim sht As Variant

For Each sht In ActiveWindow.SelectedSheets         sht.PrintOut From:=1, To:=2, Preview:=True     Next     Set sht = Nothing End Sub

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

Dieser Tipp (3279) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier:

Drucken begrenzter Seiten aus einer Reihe von Arbeitsblättern.