Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
744to748
744to748
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattschutz

Forumthread: Blattschutz

Blattschutz
15.03.2006 08:50:34
Tobias
Hallo.
Ich habe hier im Forum einen Beitrag gefunden wie ich den Blattschutz einschalten kann. Dies funktioniert auch sehr gut. mit folgendem Befehl:
Sheets("Tabelle").Protect password:="abcde", DrawingObjects:=False, Contents:=True, Scenarios:=False
Doch leider werden die Tabellen dann alle kurz angezeigt. Wie kann ich das verhindern?
Gruß
Tobias
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz
15.03.2006 09:04:14
Klaus
Hallo Tobias,

Sub blattschutz()
Application.ScreenUpdating = False
Sheets("Tabelle1").Protect password:="abcde", DrawingObjects:=False, Contents:=True, Scenarios:=False
Application.ScreenUpdating = True
End Sub

Gruß,
Klaus M.vdT.
Anzeige
AW: Blattschutz
15.03.2006 09:24:21
Tobias
Hallo.
Genau das habe ich gesucht. Danke.
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige