VBA Passwort Blattschutz nach Makro setzen

[Mitness]

Guten Morgen liebe Community,

Ich hatte schon Mal einen Threads aufgemacht, wie ich bei ausführen eines Makros, ein Blatt mit Blattschutz in Form eines Passwortes entsperre und danach wieder sperre.

Nun habe ich aber vier verschiedene Blätter mit unterschiedlichen Passwörtern und die Benutzer der jeweiligen Blätter, sollten im besten Fall das Passwort der anderen nicht wissen.

Bei Ende des Makros soll also das jeweilige Passwort wieder gesetzt werden. Wie realisiere ich das?

Mit freundlichen Grüßen
Mitness

[Cadmus]

...wie ich bei ausführen eines Makros, ein Blatt mit Blattschutz in Form eines Passwortes entsperre und danach wieder sperre.

Und das machst du jetzt für jedes Blatt.

[ralf_b]

Was ist denn das eigentliche Problem bei der Umsetzung? 
Das Setzen und Entfernen des Schutzes kennst du schon aus dem alten Thread.

[RPP63]

Mal ein paar allgemeine Anmerkungen zum Blattschutz:
Blattschutz sollte gewählt werden, um unbeabsichtigte Änderungen in der Tabelle zu verhindern.
Dies sind z.B. Überschreiben von Formeln, Spaltenüberschriften und ähnlichem.

Da der kennwortgeschützte Blattschutz aber selbst von Anfängern problemlos entfernt werden kann, ist er überflüssig!

Wie im anderen Thread bereits von MisterBurns angemerkt, sollte man ihn im Workbook_Open für alle Blätter mit dem Zusatz UserInterfaceOnly:=True setzen.
VBA darf dann ohne ent- und wiedersperren Änderungen vornehmen, der Benutzer jedoch nicht:

Dim ws As Worksheet
For Each ws in ThisWorkbook.Worksheets
   ws.Protect UserInterfaceOnly:=True
Next

Gruß Ralf

[MisterBurns]

Ich fände es nebenbei bemerkt nett, wenn du erst mal den alten Thread abschließen und eine Rückmeldung dazu geben würdest.

[RPP63]

Da der TE zwischenzeitlich ja hier reingeschaut hat …
… landet er auf der Liste meiner potentiell zu ignorierenden Fragesteller gaaaanz weit oben!

[ralf_b]

Heute  scheint im Fragestelleruniversum  forenübergreifend  das Blattschutzthema zu dominieren.
Täusche ich mich oder gibt es tatsächlich gelegentlich eine Häufung zu bestimmten Themen?

[RPP63]

Im Dez/Jan sind Urlaubsplanung und Dienstpläne ganz weit oben.

Ferner gibt es diverse Dozenten, die explizit empfehlen, bei Unklarheiten Foren aufzusuchen.

Sehr viel besser wäre es, wenn sie den Schülern beibringen würden, wie man eine Suchmaschine zielgerichtet füttert.

---

Ach so, ganz vergessen:
Ich bemerke in letzter Zeit, dass Fragesteller mit Excel-Basiskenntnissen meinen, sie könnten ihre Defizite "mal eben" mit VBA ausmerzen.

[ralf_b]

ist doch normal das man sich ne Maschine zulegt wenn man zwei linke Hände und alles Daumen hat. Leider wird vergessen das man die Bedienungsanleitung lesen muss damit man den Einschaltknopf findet.  Von der Verstellung der Drehrichtung und der Wartung und Pflege fange ich erst gar nicht an.

[Mase]

@Ralf 

Ein forenübergreifende Reizüberflutung scheint heute spürbar bei Dir... kann mich natürlich auch täuschen