nicht korrekter Blattschutz nach Öffnen
Oberschlumpf
und natürlich auch Hallo an alle Anderen
Ich habe dieses Problem:
Szenario:
---------
Einem Tabellenblatt wird im Open-Ereignis wie folgt der Blattschutz entfernt, damit während der "Arbeitszeit" keine Probs wegen Blattschutz auftreten:
ActiveSheet.Unprotect Password:="passwort"
Nachdem die Initialisierungsprozesse und alle notwendigen, nach dem Öffnen immer wieder auftretenden, Änderungen durchgeführt sind, erfolgt der Blattschutz mit folgenden Parametern:
ActiveSheet.Protect Password:="passwort", DrawingObjects:=True, Contents:=True, Scenarios:=False _
, AllowFormattingCells:=True
ActiveSheet.EnableSelection = xlUnlockedCells
(auch nur die Zeile " ActiveSheet.Protect Password:="passwort" ", ohne Parameter führt zum gleichen Fehler)
erwünschtes Ziel:
-----------------
Es soll dieses mit Blattschutz versehene Blatt angezeigt werden, und es sollen Eingaben nur in den nicht geschützten Zellen erfolgen, und auch das Anklicken geschützter Zellen soll nicht möglich sein.
aktueller Status:
-----------------
Nach dem Öffnen der Datei hat das besagte Blatt 100%-Blattschutz. Das heißt, weder das Anklicken irgendeiner Zelle, noch irgendeine Dateneingabe ist möglich.
Nur wenn ich per extra-Makro den Blattschutz entferne und eben mit den obigen Parametern wieder hinzufüge, habe ich den Zustand, wie unter "erwünschtes Ziel" beschrieben.
------------------------------------------------------
Hat jemand vielleicht, hoffentlich eine Idee, einen Vorschlag/Denkansatz, wie ich dieses Problem lösen kann?
Vielen Dank schon mal an dieses super Forum.
Ciao
Thorsten