Automatischer Blattschutz 17.07.2004 19:12:43 Ralf Ich habe zwei Blätter "Seite1" und "Seite2". wenn ich den Blattschutz für "Seite1" aufgehoben habe und dann zum Batt "Seite2" wechsle soll der Blattschutz für "Seite1" automatich wieder hergestellt werden. Geht das? Brauche dringend Hilfe. Gruß Ralf
AW: Automatischer Blattschutz Ulf Ins Modul der Tabelle1: Private Sub Worksheet_Deactivate() Me.Protect contents:=True, Password:="xxx" End Sub Ulf
AW: Automatischer Blattschutz 17.07.2004 19:20:47 JensD Hi Eie wäre es so. In das VBA Blatt der Seite1: Private Sub Worksheet_Deactivate() Me.Protect password:="dasPasswort" End Sub Gruß Jens
AW: Automatischer Blattschutz 17.07.2004 19:22:40 Matthias Hallo Ralf, Rechtklick auf "Seite1" im Arbeitsblattregister, "Code anzeigen" und den folgenden Code hier reinkopieren: Private Sub Worksheet_Deactivate() Sheets("Seite1").Protect End Sub Der Blattschutz wird vor dem Verlassen des Blattes gesetzt. Die Makros müssen aktiviert sein. Gruß Matthias Anzeige