Wie schließt man beim Drucken einer Arbeitsmappe ein bestimmtes Arbeitsblatt aus?
Wenn Sie eine Arbeitsmappe mit mehreren Arbeitsblättern haben, die gedruckt werden sollen, aber ein bestimmtes Blatt ausschließen möchten – gibt es eine schnelle und einfache Möglichkeit, in Excel alle Blätter außer diesem einen zu drucken?
Ein bestimmtes Arbeitsblatt beim Drucken einer Arbeitsmappe mithilfe von VBA-Code ausschließen
Ein bestimmtes Arbeitsblatt beim Drucken einer Arbeitsmappe mithilfe von VBA-Code ausschließen
Mithilfe des folgenden VBA-Codes können Sie die gesamte Arbeitsmappe drucken – mit Ausnahme eines bestimmten Arbeitsblatts.
1. Halten Sie die ALT + F11-Tasten gedrückt, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code im Modulfenster ein.
VBA-Code: Ein bestimmtes Arbeitsblatt beim Drucken einer Arbeitsmappe ausschließen:
Private Sub Printexclude()
'Updateby Extendoffcie
Dim ws As Worksheet
Dim strShName As String
On Error Resume Next
strShName = Application.InputBox("Enter the sheet name you want to exclude:", _
"Kutools For Excel", , , , , , 2)
Application.ScreenUpdating = False
For Each ws In ThisWorkbook.Worksheets
If ((ws.Visible = xlSheetVisible) And _
(ws.Name <> strShName)) Then ws.PrintOut
Next ws
Application.ScreenUpdating = True
End Sub
3. Drücken Sie anschließend die F5-Taste, um diesen Code auszuführen. Es erscheint ein Eingabefeld, in dem Sie aufgefordert werden, den Namen des Blatts einzugeben, das beim Drucken der Arbeitsmappe ausgeschlossen werden soll. Siehe Screenshot:
4. Klicken Sie dann auf die Schaltfläche OK, und alle anderen Arbeitsblätter werden sofort gedruckt – mit Ausnahme des angegebenen Blatts.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
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