Thema: Blattschutz aufheben, Daten eintragen, Blattschutz setzen

Home

Gruppe

Allgemein

Problem

Vor dem Dateneintrag soll geprüft werden, ob ein Blattschutz besteht. Wenn ja, soll er aufgehoben, die Daten eingetragen und der Schutz wieder gesetzt werden.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.

StandardModule: Modul1

Sub ProtectUnprotect()
   Dim bln As Boolean
   bln = Tabelle1.ProtectContents
   ActiveSheet.Unprotect
   Range("A1").Value = "Hallo"
   If bln Then ActiveSheet.Protect
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