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

Blattschutz automatisch einschalten

Forumthread: Blattschutz automatisch einschalten

Blattschutz automatisch einschalten
03.06.2004 10:21:45
Stefan
Hallo,
wie kann ich den Blattschutz automatisch einschalten. Wenn ich ihn ausschalte und vergesse kann ein anderer Benutzer die Tabelle bearbeiten.
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz automatisch einschalten
Kurt
Auch eine Automatik muss irgendwie angestoßen werden. Wenn du dir überlegst,was
ein geeignetes Ereignis sein könnte, hast du auch schon die Lösung.
Kurt
AW: Blattschutz automatisch einschalten
03.06.2004 10:32:19
Andreas
Hallo,
hast du es so schon mal probiert?
Workbook Open (Einstellen)

Private Sub Workbook_Open()
Sheets("Tabellenname").Unprotect "Passwort"
End Sub

'Bei der Öffnung der Datei wird durch ein Passwort der Blattschutz aufgehoben!
Workbook Deactivate

Private Sub Workbook_Deactivate()
Sheets("Tabellenname").Protect "Passwort"
End Sub

'Beim Schließen der Datei wird durch ein Passwort der Blattschutz aktiviert!
MFG Andi
Anzeige
AW: Blattschutz automatisch einschalten
Markus
Hallo Stefan,
per Makro würde das zB mit dem Befehl
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
funktionieren. Statt ActiveSheet kannst du natürlich auch den Namen des zu
schützenden Blattes angeben
Viele Grüße,
Markus
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige