Wie druckt man mehrere ausgewählte Bereiche auf einer einzigen Seite in Excel?
Wenn Sie ein großes Arbeitsblatt mit vielen Daten haben und nun mehrere nicht zusammenhängende Bereiche auswählen möchten, um Papier zu sparen, bietet Excel die Funktion Seite einrichten, um diese Auswahlbereiche gleichzeitig zu drucken. Allerdings wird jeder ausgewählte Bereich standardmäßig auf einer separaten Seite gedruckt. In diesem Artikel erfahren Sie, wie Sie mehrere nicht zusammenhängende Bereiche stattdessen auf einer einzigen Seite drucken können.
Mehrere Auswahlbereiche aus einem Arbeitsblatt auf einer Seite mit VBA-Code drucken
Mehrere Auswahlbereiche aus einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken
Mehrere Auswahlbereiche aus einem Arbeitsblatt auf einer Seite mit VBA-Code drucken
Um mehrere ausgewählte, nicht zusammenhängende Bereiche eines Arbeitsblatts auf einer Seite zu drucken, hilft Ihnen der folgende VBA-Code. Gehen Sie dazu wie folgt vor:
1. Drücken Sie die Strg-Taste, um die gewünschten Bereiche auszuwählen.
2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.
3. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das Modul-Fenster ein.
VBA-Code: Mehrere Auswahlbereiche auf einer 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 anschließend die F5-Taste, um diesen Code auszuführen. Ihr ausgewählter Bereich wird dann sofort auf einer einzigen Seite gedruckt.
Mehrere Auswahlbereiche aus einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken
Der obige Code ermöglicht das Drucken einer Auswahl nur innerhalb eines einzelnen Arbeitsblatts. Möchten Sie hingegen mehrere Auswahlbereiche aus verschiedenen Arbeitsblättern auf einer Seite drucken, funktioniert dieser Code nicht. Keine Sorge – hier stelle ich Ihnen ein praktisches Tool vor: Kutools für Excel. Mit dessen Hilfsprogramm Assistent zum Drucken mehrerer Auswahlbereiche können Sie Auswahlbereiche aus einem oder mehreren Arbeitsblättern gleichzeitig auf einer Seite drucken.
Nach der Installation von Kutools für Excelführen Sie bitte die folgenden Schritte aus:
1. Klicken Sie auf KUTOOLS PLUS > Drucken > Assistent zum Drucken mehrerer Auswahlbereiche, siehe Screenshot:
2. Klicken Sie im Assistenten zum Drucken mehrerer Auswahlbereiche auf die Schaltfläche 
, um nacheinander die gewünschten Druckbereiche auszuwählen und zur Liste „Zu druckende Bereiche“ hinzuzufügen (Sie können Bereiche aus einem oder mehreren Arbeitsblättern auswählen). Mit der Schaltfläche können Sie nicht benötigte Bereiche entfernen. Siehe Screenshot:
3. Nachdem Sie die Auswahlbereiche zur Liste hinzugefügt haben, klicken Sie auf die Schaltfläche Weiter >>, um zu Schritt 2 des Assistenten zu gelangen. Geben Sie dort Ihre gewünschten Druckeinstellungen an, und fügen Sie durch Aktivieren der Option Fügen Sie zwischen jedem zu druckenden Bereich eine leere Zeile ein eine leere Zeile zwischen die Bereiche ein. Siehe Screenshot:
4. Klicken Sie anschließend erneut auf die Schaltfläche Weiter >>. In Schritt 3 des Assistenten legen Sie die Aktionen für das temporäre Arbeitsblatt fest: Sie können das Arbeitsblatt aktivieren, ohne es zu drucken, das Arbeitsblatt drucken und behalten oder das Arbeitsblatt drucken und anschließend löschen. Siehe Screenshot:
5. Klicken Sie auf die Schaltfläche Fertig stellen. Alle ausgewählten Bereiche wurden als verknüpfte Bildobjekte in ein neues Arbeitsblatt eingefügt. Sie können sie im Arbeitsblatt verschieben und neu anordnen. Siehe Screenshot:
6. Beim Drucken dieses neuen Arbeitsblatts werden die Bereiche wie gewünscht auf einer einzigen Seite ausgegeben.
Kutools für Excel– Erweitern Sie Excel mit über 300 unverzichtbaren Tools, um Ihre Arbeit schneller und einfacher zu erledigen, und nutzen Sie KI-Funktionen für intelligentere Datenverarbeitung und höhere Produktivität.Jetzt herunterladen
Demo: Mehrere Auswahlbereiche aus einem oder mehreren Arbeitsblättern auf einer Seite mit Kutools für Excel drucken
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins