KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie verhindert man, dass Benutzer ein Arbeitsblatt drucken können?

AutorXiaoyang Änderungsdatum

In unserer täglichen Arbeit können sich im Arbeitsblatt wichtige Informationen befinden. Um die Weitergabe interner Daten zu verhindern, erlaubt die Abteilung das Drucken nicht. Im Folgenden erfahren Sie, wie Sie Benutzern das Drucken eines Arbeitsblatts untersagen können.

Verhindern Sie das Drucken eines bestimmten Arbeitsblatts mithilfe von VBA

Verhindern Sie das Drucken der gesamten Arbeitsmappe mithilfe von VBA


Pfeil blau rechts Sprechblase Verhindern Sie das Drucken eines bestimmten Arbeitsblatts mithilfe von VBA

Sie können den folgenden VBA-Code verwenden, um Ihr gewünschtes Arbeitsblatt vor dem Drucken zu schützen.

1. Aktivieren Sie das Arbeitsblatt, dessen Druckfunktion Sie deaktivieren möchten.

2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

3. Doppelklicken Sie anschließend im linken Bereich des Projekt-Explorers auf DieseArbeitsmappe, um das Modul zu öffnen, und fügen Sie den folgenden Code darin ein:

VBA-Code: Verhindern des Druckens eines bestimmten Arbeitsblatts

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140625
Dim WsName As String
WsName = "Sheet1"
For Each xWs In Application.ActiveWorkbook.Windows(1).SelectedSheets
    If xWs.Name = WsName Then
    MsgBox ("You can not print this worksheet")
        Cancel = True
    End If
Next
End Sub

Drucken des Arbeitsblatts per VBA-Code verhindern

Hinweis: Im obigen Code ist Tabelle1 das aktive Arbeitsblatt, das Sie nicht drucken dürfen.

4. Führen Sie anschließend diesen Code aus, speichern und schließen Sie die Datei – und sobald Sie versuchen, dieses bestimmte Arbeitsblatt zu drucken, erhalten Sie die folgende Warnmeldung.

Druckwarnmeldung für Arbeitsblatt verhindern

Hinweis: Mit diesem Code ist nur das betreffende Arbeitsblatt nicht druckbar – alle anderen Blätter können wie gewohnt gedruckt werden.


Pfeil blau rechts Sprechblase Verhindern Sie das Drucken der gesamten Arbeitsmappe mithilfe von VBA

Möchten Sie verhindern, dass Benutzer die gesamte Arbeitsmappe drucken, steht Ihnen hierfür ebenfalls ein passender Code zur Verfügung.

1. Öffnen Sie Ihre Arbeitsmappe, deren Druck durch andere nicht gestattet ist.

2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

3. Klicken Sie dann im linken Bereich des Projekt-Explorersdoppelt auf DieseArbeitsmappe, um das Modul zu öffnen, und fügen Sie den folgenden Code darin ein:

VBA-Code: Verhindern des Druckens eines bestimmten Arbeitsblatts

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub

Drucken der Arbeitsmappe per VBA-Code verhindern

4. Führen Sie anschließend diesen Code aus, speichern und schließen Sie die Datei, kehren Sie zur Arbeitsmappe zurück – und sobald Sie versuchen, ein Arbeitsblatt oder die gesamte Arbeitsmappe zu drucken, wird dies nicht gestattet sein. Stattdessen erhalten Sie die folgende Warnmeldung:

Druckwarnmeldung für Arbeitsmappe verhindern


Verwandte Artikel:

Wie druckt man mehrere Arbeitsmappen in Excel aus?

Wie legt man den Druckbereich in Excel fest?

Wie druckt man die aktuelle Seite schnell in Excel?

Wie druckt man eine lange Spalte auf einer Seite in Excel?

Beste Office-Produktivitätstools

🤖KUTOOLS AI-Assistent: Revolutionieren Sie Datenanalyse basierend auf:Intelligente Ausführung   |  Code generieren|  benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme erstellen|  Erweiterte Funktionen aufrufen
Beliebte Funktionen:Suchen, hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten kombinieren oder Zellen ohne Datenverlust   |   Runden ohne Formel...
Erweiterte SVERWEIS:VLookup mit mehreren Kriterien  |  VLookup mit mehreren Werten  |   VLookup über mehrere Arbeitsblätter hinweg   |   Fuzzy Match....
Erweiterte Dropdown-Liste:Schnell eine Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl-Dropdown-Liste....
Spalten-Manager:Eine bestimmte Anzahl von Spalten hinzufügen|Spalten verschieben|Sichtbarkeitsstatus ausgeblendeter Spalten umschalten|Bereiche & Spalten vergleichen...
Hervorgehobene Funktionen:Gitterfokus   |  Entwurf   |Erweiterte Formelleiste   | Arbeitsmappen- & Blatt-Manager   |  Ressourcenbibliothek(AutoText)|  Datumsauswahl   |  Arbeitsblätter konsolidieren  |  Verschlüsseln/Zellen entschlüsseln   | E-Mails per Liste versenden   |  Super Filter   |   Spezialfilter(Zellen mit fettgedruckter Schrift filtern/kursiv/durchgestrichen...) ...
Top-15-Toolsets:12-Text-Tools(Text hinzufügen,Bestimmte Zeichen löschen, ...)|   50+-Diagramm-Typen(Gantt-Diagramm, ...)|   40+ Praktische Formeln(Alter basierend auf dem Geburtstag berechnen, ...)|   19-Einfüge-Tools(QR-Code einfügen,Bild aus Pfad einfügen, ...)|   12-Konvertierungs-Tools(In Wörter umwandeln,Wechselkursumrechnung, ...)|   7-Vereinigen/Aufteilen-Tools(Erweiterte Zeilen zusammenführen,Zellen aufteilen, ...)|... und mehr
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und 40+ weitere Sprachen!

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.

ExcelWordOutlookTabsPowerPoint
  • 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