Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Automatischer Blattschutz

Forumthread: Automatischer Blattschutz

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
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
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:29:00
Ralf
Hey besten Dank. Klappt Prima.
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
Anzeige
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
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige