Wie druckt man mehrere Auswahlbereiche auf einer Seite in Excel?

Wenn Sie ein großes Arbeitsblatt mit vielen Daten haben und nun einige ausgewählte, nicht zusammenhängende Bereiche auf einer Seite drucken möchten, um Papier zu sparen, bietet Excel die Funktion Druckbereich festlegen an, um mehrere Auswahlbereiche gleichzeitig zu drucken. Jeder ausgewählte Bereich wird jedoch auf einer separaten Seite gedruckt. Dieser Artikel behandelt, wie man mehrere nicht zusammenhängende Auswahlbereiche auf einer einzigen Seite druckt.

Mehrere Auswahlbereiche von einem Arbeitsblatt auf einer Seite mit VBA-Code drucken

Mehrere Auswahlbereiche von einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken

Mehrere Auswahlbereiche von einem Arbeitsblatt auf einer Seite mit VBA-Code drucken

Um mehrere ausgewählte, nicht zusammenhängende Bereiche eines Arbeitsblatts auf einer einzigen Seite zu drucken, kann der folgende VBA-Code helfen. Bitte gehen Sie wie folgt vor:

1. Drücken Sie die Strg-Taste, um die Bereiche auszuwählen, die Sie drucken möchten.

2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

3. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code im Modulfenster ein.

VBA-Code: Mehrere Auswahlbereiche auf eine Seite drucken

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und Ihre ausgewählten Bereiche werden sofort gedruckt und auf einer einzigen Seite ausgegeben.

Mehrere Auswahlbereiche von einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken

Der obige Code kann Ihnen nur helfen, die ausgewählten Bereiche von einem Arbeitsblatt zu drucken. Wenn Sie mehrere Auswahlbereiche von mehreren Arbeitsblättern auf einer Seite drucken möchten, funktioniert der obige Code nicht. Keine Sorge, hier möchte ich Ihnen ein praktisches Tool vorstellen – Kutools für Excel. Mit dem Hilfsprogramm Print Multiple Selection Wizard können Sie die Auswahlbereiche von einem oder mehreren Arbeitsblättern auf einmal auf einer Seite drucken.

Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:

1. Klicken Sie auf Kutools Plus > Drucken > Print Multiple Selection Wizard, siehe Screenshot:

2. Im Print Multiple Selection Wizard, klicken Sie auf , um den gewünschten Bereich auszuwählen und ihn nacheinander zur Liste der zu druckenden Bereiche hinzuzufügen (Sie können Bereiche von einem oder mehreren Arbeitsblättern auswählen). Klicken Sie auf , um die Bereiche zu entfernen, die Sie nicht benötigen, siehe Screenshot:

3. Nachdem Sie die Auswahlbereiche zur Liste hinzugefügt haben, klicken Sie bitte auf die Schaltfläche Weiter >>, um zum Schritt 2 des Assistenten zu gelangen. Legen Sie die Druckeinstellungen nach Bedarf fest, und Sie können zwischen den ausgewählten Bereichen eine leere Zeile hinzufügen, indem Sie die Option Fügen Sie zwischen jedem zu druckenden Bereich eine leere Zeile ein aktivieren, siehe Screenshot:

4. Klicken Sie weiter auf die Schaltfläche Weiter >>; im Schritt 3 des Assistenten legen Sie die Aktionen für das temporäre Arbeitsblatt fest. Sie können das Arbeitsblatt aktivieren, aber nicht drucken, das Arbeitsblatt drucken und behalten oder das Arbeitsblatt drucken und löschen. Siehe Screenshot:

5. Klicken Sie auf die Schaltfläche Fertig, alle ausgewählten Bereiche wurden als verknüpfte Bildobjekte in ein neues Arbeitsblatt eingefügt. Sie können sie im Arbeitsblatt ziehen und neu anordnen. Siehe Screenshot:

6. Wenn Sie dieses neue Arbeitsblatt drucken, werden die Bereiche auf einer einzigen Seite gedruckt, wie Sie es benötigen.

Klicken Sie hier, um mehr über das Hilfsprogramm Print Multiple Selection Wizard zu erfahren.

Demo: Mehrere Auswahlbereiche von einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken