HERBERS Excel-Forum - die Beispiele

Thema: Blattschutz für alle Arbeitsblätter setzen oder aufheben

Home

Gruppe

Allgemein

Problem

Über die Schaltflächen soll der Blattschutz für alle Tabellenblätter gesetzt bzw. aufgehoben werden.

Lösung
Geben Sie den Code in ein Standardmodul ein und weisen Sie ihn zwei Schaltflächen zu.
StandardModule: Modul1

Sub YesProtect()
   Dim wks As Worksheet
   For Each wks In Worksheets
      wks.Protect "MeinPasswort"
   Next wks
End Sub

Sub NoProtect()
   Dim wks As Worksheet
   For Each wks In Worksheets
      wks.Unprotect "MeinPasswort"
   Next wks
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Blattschutz

Blattschutz per Userform ein und ausschalten Userform soll Blattschutz regeln
Autofilter trotz Blattschutz Blattschutz mit Abfragefenster
Blattschutz in Makro integrieren Blattschutz vs. Gruppierung
Blattschutzpasswort in Zelle? Blattschutz mit falschem Passwort entfernt
Allgemeine Frage zur Fehlerbehandlung allgemeine Fragen zu einer Datenbank
Autofilter mit Blattschutz Blattschutz bei Diagrammen
Makro trotz Blattschutz Blattschutz
Probleme mit Blattschutz bei Excelvorlage Benutzerdefinierte Ansicht nach Blattschutz
Benutzerdefinierte Ansichten trotz Blattschutz Blattschutz auch bei Formeln aufheben
Gesperrte zellen trotz Blattschutz überschrieben Gruppierung bearbeiten trotz Blattschutz
Blattschutz und Makros Tastenkombination freigeben trotz Blattschutz
allgemein Checkbox - LinkedCell - Blattschutz
Gruppierung trotz Blattschutz speichern von Blattschutz änderungen
Fehlermeldung wenn Blattschutz aktiv Blattschutz macht was er will
Fehler wegen Blattschutzautomatik?? Kopieren in Blattschutz
Makro für Blattschutz Makro für Blattschutz mit Passwort
Blattschutz mit Kennwort als Makro Blattschutz mit Kennwort als Makro
Blattschutz Makro ausführen mit Blattschutz auf Tabelle 2
Autofilter trotz Blattschutz Verwendung von Makro trotz Blattschutz
mit VBA Blattschutz Listen und Blattschutz
Freigegebene Arbeitsmappe, Ansichten & Blattschutz option field - Blattschutz
Blattschutz an Bedingung knüpfen Blattschutz mit Passwort
Blattschutz blattschutz
Blattschutz allgemein: VBA lernen?
Hide-Methode-Allgemeine Frage Blattschutz