Zum Hauptinhalt springen

Wie druckt man ausgewählte Spalten zusammen auf einer Seite in Excel?

Author: Siluvia Last Modified: 2025-08-06

Standardmäßig druckt Excel nicht angrenzende (nicht zusammenhängende) ausgewählte Spalten auf separaten Seiten. Wenn Sie ausgewählte Spalten zusammen auf einer Seite drucken möchten, so gehen Sie wie folgt vor.

Ausgewählte Spalten mit VBA-Code zusammen drucken
Ausgewählte Spalten ganz einfach mit einem erstaunlichen Tool zusammen drucken


Ausgewählte Spalten mit VBA-Code zusammen drucken

Sie können mehrere ausgewählte Spalten zusammen auf einer Seite mit VBA-Code drucken. Gehen Sie bitte wie folgt vor.

1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Application zu öffnen.

2. Klicken Sie im Fenster Microsoft Visual Basic for Application auf Einfügen > Modul. Kopieren und fügen Sie dann den folgenden VBA-Code in das Modulfenster ein.

VBA-Code: Ausgewählte Spalten zusammen drucken

Sub Print_MultiAreas()
	Dim xRg As Range
	Dim xSht As Worksheet
	Dim xArea As Range
	Dim xTxt As String
	On Error Resume Next
	xTxt      = ActiveWindow.RangeSelection.Address
	Set xRg   = Application.InputBox("Please select columns:", "Kutools for Excel", xTxt, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		Set xSht = Worksheets.Add(After: = Sheets(Sheets.Count))
		For Each xArea In xRg.Areas
			xArea.Copy Destination: = xSht.Range(xArea.Address)
			xSht.Range(xArea.Address).Value = xArea.Value
		Next
		xSht.PrintPreview
		'xSht.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
		Application.DisplayAlerts = False
		xSht.Delete
		Application.DisplayAlerts = True
		xRg.Parent.Activate
	End Sub

3. Drücken Sie die Taste F5, um den Code auszuführen. Dann erscheint ein Dialogfeld von Kutools für Excel, wählen Sie bitte die Spalten aus, die Sie drucken möchten, indem Sie die Strg-Taste gedrückt halten und auf jede Spalte klicken. Klicken Sie abschließend auf die Schaltfläche OK. Siehe Screenshot:

A screenshot showing column selection dialog for printing

4. Anschließend erhalten Sie ein Druckvorschau-Fenster, klicken Sie auf die Schaltfläche Drucken, um den Druckvorgang zu starten.

Hinweis: Wenn einige der ausgewählten Spalten nicht auf einer Seite sind, klicken Sie im Vorschaufenster auf Nächste Seite, um andere Auswahlmöglichkeiten anzuzeigen. Diese werden auf separaten Seiten gedruckt.


Ausgewählte Spalten ganz einfach mit einem erstaunlichen Tool zusammen drucken

Wenn der Umgang mit VBA-Code für Sie schwierig ist, können Sie das Hilfsprogramm Print Multiple Selection Wizard von Kutools für Excel ausprobieren. Mit diesem Hilfsprogramm können Sie ganz einfach mehrere ausgewählte Spalten mit nur wenigen Klicks zusammen auf einer Seite drucken.

Kutools für Excel bietet über 300 erweiterte Funktionen, um komplexe Aufgaben zu vereinfachen und Kreativität sowie Effizienz zu steigern. Durch die Integration mit KI-Funktionen automatisiert Kutools Aufgaben präzise und macht das Datenmanagement mühelos. Detaillierte Informationen zu Kutools für Excel... Kostenlose Testversion...

1. Wählen Sie die Spalten nacheinander aus, während Sie die Strg-Taste gedrückt halten. Klicken Sie dann auf Kutools Plus > Drucken > Print Multiple Selection Wizard.

A screenshot showing the Print Multiple Selection Wizard option in Kutools tab on the ribbon

2. Im Dialogfeld Print Multiple Selections Wizard – Schritt 1 von 3 sind alle Ihre ausgewählten Spalten in der Listenbox aufgeführt, klicken Sie bitte auf die Schaltfläche Fertig.

A screenshot of the Print Multiple Selections Wizard step 1 of 3 dialog

3. Dann werden alle ausgewählten Spalten als Objekte extrahiert und auf einem leeren Arbeitsblatt platziert (standardmäßig werden alle ausgewählten Spalten in einer Spalte platziert, Sie können ihre Positionen nach Bedarf anordnen). Starten Sie dann den Druck des Arbeitsblatts.

A screenshot of selected columns extracted as objects for printing on a blank worksheet

Hinweis: Wenn Sie die Druckeinstellungen festlegen möchten, klicken Sie bitte in diesem Schritt 1 von 3 Dialogfeld auf die Schaltfläche Weiter, und legen Sie die Einstellungen wie im folgenden Screenshot gezeigt fest.

A screenshot of the print settings dialog in Kutools Print Multiple Selections Wizard

Kutools für Excel - Verleihen Sie Excel mit über 300 essenziellen Tools einen echten Schub. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Holen Sie es sich jetzt

Die besten Office-Produktivitätstools

🤖 Kutools AI Aide: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung |  Code generieren  |  Benutzerdefinierte Formeln erstellen |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Doppelte suchen, hervorheben oder markieren | Leere Zeilen löschen | Spalten oder Zellen ohne Datenverlust zusammenführen | Runden
Erweiterte SVERWEIS: SVERWEIS mit mehreren Kriterien | SVERWEIS für mehrere Werte | Mehrblatt-SVERWEIS | Fuzzy Match
Erweiterte Dropdown-Liste: Dropdown-Liste schnell erstellen | Abhängige Dropdown-Liste | Mehrfachauswahl-Dropdown-Liste
Spalten-Manager: Eine bestimmte Anzahl an Spalten hinzufügen | Spalten verschieben | Sichtbarkeit von ausgeblendeten Spalten umschalten | Bereiche & Spalten vergleichen
Hervorgehobene Funktionen: Gitterfokus | Entwurfsansicht | Erweiterte Formelleiste | Arbeitsmappen- & Blattmanager | AutoText-Bibliothek | Datumsauswahl | Daten zusammenführen | Zellen verschlüsseln/entschlüsseln | E-Mail senden nach Liste | Super Filter | Spezialfilter (Filtern nach Fett/Kursiv/Durchgestrichen...)…
Top15 Toolsets:12 Text-Tools (Text hinzufügen, Bestimmte Zeichen löschen, ...) | 50+ Diagramm typen (Gantt-Diagramm, ...) | 40+ praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...) | 19 Einfüge-Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...) | 12 Konvertierungs-Tools (In Wörter umwandeln, Währungsumrechnung, ...) | 7 Konsolidieren & Aufteilen-Tools (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...) | ... und mehr
Nutzen Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere Sprachen!

Steigern Sie Ihre Excel-Kompetenz mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen, um Ihre Produktivität zu steigern und Zeit zu sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt die Reiter-Oberfläche in Office und macht Ihre Arbeit so viel einfacher

  • Aktivieren Sie die Bearbeitung und das Lesen in Reitern in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Reitern desselben Fensters, anstatt in neuen Fenstern.
  • Steigert Ihre Produktivität um50 % und reduziert täglich Hunderte von Mausklicks!