Wie zeigt man in Excel nur den Druckbereich in einem Arbeitsblatt an?

Wenn wir ein Arbeitsblatt in der Seitenumbruch-Vorschau anzeigen, indem wir auf Ansicht > Seitenumbruch-Vorschau klicken, wird der Hintergrund des nicht druckbaren Bereichs automatisch in Dunkelgrau angezeigt. Siehe folgender Screenshot:

Hinweis: Sie können auch zur Seitenumbruch-Vorschau wechseln, indem Sie in der Statusleiste auf die Schaltfläche Seitenumbruch-Vorschau klicken.

Diese Methode blendet jedoch den Nicht-Druckbereich nicht aus, sodass Sie die Daten darin weiterhin sehen können.

Mit einem Klick alles außer Bereich auswählen ausblenden (ungenutzte Spalten/Zeilen/Zellen ausblenden)

Meistens nutzen wir nur einen Teil des Arbeitsblatts – der Rest bleibt als leerer Bereich mit numerischen Zellen ungenutzt. Mit dem Auswahlbereich ausblenden-Tool von Kutools für Excel blenden Sie mit einem einzigen Klick alles außer dem gewünschten Bereich aus oder verbergen mühelos alle ungenutzten Zellen, Zeilen, Spalten und Bereiche.

Um den Nicht-Druckbereich in Excel vollständig auszublenden, können Sie ein VBA-Makro verwenden. Gehen Sie dazu wie folgt vor:

Schritt 1: Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.

Schritt 2: Klicken Sie auf Einfügen>Modul, und fügen Sie anschließend den folgenden VBA-Code in das Modulfenster ein:

VBA: Nur Druckbereich in Aktuelles Arbeitsblatt anzeigen

Public Sub HideAllButPrintArea()
Dim xPrintRng As Range
Dim xFirstRng As Range
Dim xLastRng As Range
Application.ScreenUpdating = False
With Application.ActiveSheet
.Cells.EntireColumn.Hidden = False
.Cells.EntireRow.Hidden = False
If .PageSetup.PrintArea <> "" Then
Set xPrintRng = .Range(.PageSetup.PrintArea)
Else
Set xPrintRng = .UsedRange
End If
Set xFirstRng = xPrintRng.Cells(1)
Set xLastRng = xPrintRng.Cells(xPrintRng.Count)
If xFirstRng.Row > 1 Then
.Range(.Cells(1, 1), xFirstRng(-0, 1)).EntireRow.Hidden = True
End If
If xFirstRng.Column > 1 Then
.Range(.Cells(1, 1), xFirstRng(1, 0)).EntireColumn.Hidden = True
End If
If xLastRng.Row < .Rows.Count Then
.Range(xLastRng(2, 1), .Cells(.Rows.Count, 1)).EntireRow.Hidden = True
End If
If xLastRng.Column < .Columns.Count Then
.Range(xLastRng(1, 2), .Cells(1, .Columns.Count)).EntireColumn.Hidden = True
End If
End With
Application.ScreenUpdating = True
End Sub

Schritt 3: Drücken Sie die Taste F5 oder klicken Sie auf die Schaltfläche Ausführen, um dieses VBA-Makro auszuführen.

Anschließend wird der Nicht-Druckbereich sofort ausgeblendet, und es bleibt nur der Druckbereich im aktuellen Arbeitsblatt sichtbar. Siehe folgender Screenshot:

Hinweise:

1. Wenn sich im aktuellen Arbeitsblatt nur ein Druckbereich befindet, funktioniert das VBA-Makro einwandfrei.
2. Diese Methode unterstützt keine Rückgängigmachung. Um den Nicht-Druckbereich anzuzeigen, müssen Sie den nicht druckbaren Bereich manuell einblenden oder das Kutools für Excel-Hilfsprogramm Ausblenden > Alle ausgeblendeten Bereiche wieder einblenden verwenden.

Wenn Kutools für Excel installiert ist, hilft Ihnen das zugehörige Auswahlbereich ausblenden-Hilfsprogramm dabei, problemlos nur den Druckbereich im aktuellen Arbeitsblatt anzuzeigen.

Schritt 1: Wählen Sie den Druckbereich im aktuellen Arbeitsblatt aus.

Hinweis: Falls Sie den Druckbereich nicht schnell finden können, drücken Sie die Taste F5, um das Dialogfeld „Gehe zu“ zu öffnen, wählen Sie den Namen Druckbereich aus und klicken Sie auf die Schaltfläche OK, wie im folgenden Screenshot dargestellt. Diese Methode markiert jedoch alle Druckbereiche im aktuellen Arbeitsblatt.

Schritt 2: Klicken Sie auf Kutools > Anzeigen / Ausblenden > Auswahlbereich ausblenden.

Anschließend wird nur das ausgewählte Druckbereich sofort in Aktuelles Arbeitsblatt angezeigt, wie im folgenden Screenshot gezeigt:

Hinweise:

1. Die Funktion Auswahlbereich ausblenden von Kutools für Excel unterstützt die Rückgängigmachung – drücken Sie einfach gleichzeitig die Tasten Strg + Z, um den ausgeblendeten Nicht-Druckbereich wieder anzuzeigen.
2. Klicken Sie auf Kutools > Anzeigen / AusblendenAusblenden > Alle ausgeblendeten Bereiche wieder einblenden, um ausgeblendete Nicht-Druckbereiche sofort anzuzeigen.

Bildlaufposition festlegen oder andere Zellen ausblenden

Ausgeblendete Bereiche (Spalten und Zeilen) anzeigen

Andere Blätter ausblenden