Wie löscht man den Druckbereich gleichzeitig über mehrere Arbeitsblätter hinweg in Excel?
In einigen Fällen legen wir möglicherweise einen Druckbereich in einem Arbeitsblatt fest. Wenn jedoch mehrere Arbeitsblätter jeweils unterschiedliche Druckbereiche aufweisen – wie kann ich dann alle Druckbereiche gleichzeitig über mehrere Arbeitsblätter hinweg in Excel löschen? Das manuelle Löschen einzeln ist zeitaufwendig – gibt es eine schnellere Methode?
Druckbereich über die gesamte Arbeitsmappe mit VBA löschen
Druckbereich über mehrere Arbeitsblätter hinweg mit Seitenlayout kopieren löschen ![]()
Druckbereich über die gesamte Arbeitsmappe mit VBA löschen
Hier ist ein Makrocode, mit dem Sie alle Druckbereiche in der gesamten Arbeitsmappe löschen können.
1. Drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Doppelklicken Sie im Bereich Projekt – VBAProject auf DieseArbeitsmappe und fügen Sie den folgenden VBA-Code in das rechte leere Skriptfenster ein. Siehe Screenshot:
VBA: Druckbereich in der gesamten Arbeitsmappe löschen
Sub ClearPrintArea()
'UpdatebyExtendoffice20171229
Dim xSheet As Worksheet
For Each xSheet In Worksheets
xSheet.PageSetup.PrintArea = ""
Next
End Sub 
3. Drücken Sie die Taste F5, um den Code auszuführen. Anschließend werden alle Druckbereiche aus der Arbeitsmappe entfernt.
Druckbereich über mehrere Arbeitsblätter hinweg mit Seitenlayout kopieren löschen
Wenn Sie Kutools für Excel besitzen, hilft Ihnen das integrierte Hilfsprogramm „Seitenlayout kopieren“ dabei, mehrere Druckbereiche über verschiedene Arbeitsblätter hinweg zu löschen.
1. Wählen Sie ein Arbeitsblatt aus, beispielsweise „Zufallspasswort“, und klicken Sie anschließend auf Seitenlayout > Druckbereich > Druckbereich löschen. Siehe Screenshot:
2. Klicken Sie dann auf KUTOOLS PLUS > Drucken > Seitenlayout kopieren.
3. Im Dialogfeld Seitenlayout kopieren wählen Sie im Abschnitt
Kopieren nach alle Arbeitsblätter außer dem aktuellen Arbeitsblatt aus – aktivieren Sie die Kontrollkästchen derjenigen Blätter, von denen Sie den Druckbereich löschen möchten. Wechseln Sie anschließend zum Abschnitt
Optionen und aktivieren Sie unter der Liste Arbeitsblatt ausschließlich die Option Druckbereich . Siehe Screenshot:
4. Klicken Sie auf OK. Der Druckbereich wurde nun aus den ausgewählten Arbeitsblättern entfernt.
Demo
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