kurz und knapp:
Ich schütze meine "Sheets" durch einen Macro mit Passwort und nehme den Schutz runter wenn ein anderes Makro läuft. Also jedes mal wenn ich eine Makro starte ruft dies dann gleich die "unprotect" Prozedur auf und dannach wieder die "Protect".
Problem ist aber, dass ich wenn die Zellen dann wieder gesperrt werden nach der Makro. Dann kann man nämlich mit einem einfachen klick auf "Blattschutz entfernen"
,den Blattschutz ohne Passwort aufheben. Wie kann das sein ?
Sub Protect()
Sheets("Eingabe").Protect Hieristdasspasswort
Sheets("Ausgabe").Protect Hieristdasspasswort
Sheets("AusgabeWoche").Protect Hieristdasspasswort
Sheets("AusgabeMonat").Protect Hieristdasspasswort
Sheets("AusgabeJahr").Protect Hieristdasspasswort
End Sub
Sub Unprotect()
Sheets("Eingabe").Unprotect Hieristdasspasswort
Sheets("Ausgabe").Unprotect Hieristdasspasswort
Sheets("AusgabeWoche").Unprotect Hieristdasspasswort
Sheets("AusgabeMonat").Unprotect Hieristdasspasswort
Sheets("AusgabeJahr").Unprotect Hieristdasspasswort
Sheets("Eingabe").Select
End Sub
Gruß JoNNy