Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1112to1116
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattschutz für einige Blätter aus/ein

Blattschutz für einige Blätter aus/ein
liese
Hallo!
Wie kann ich für einige (nicht alle) Blätter einer Arbeitsmappe
den Blattschutz mit PW aus- bzw. einschalten?
Viele Grüße
Anneliese

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Blattschutz für einige Blätter aus/ein
04.11.2009 12:28:07
Rudi
Hallo,
Sheets("Tabelle1").Protect "Kennwort"
Sheets("Tabelle1").Unprotect "Kennwort"
Gruß
Rudi
AW: Extra/Schutz/Blatt schützen
04.11.2009 12:28:22
dieter(drummer)
Hi Anneliese,
unter "Extra/Schutz/Blatt schützen" und dann ein Kennwort eingeben. Dabei können auch unterschiedliche Schutzoptionen genutzt werden.
Gruss dieter(drummer)
AW: Blattschutz für einige Blätter aus/ein
04.11.2009 12:41:51
Holger
Hallo liese,
der einfachste Weg:

Sub passwort_an()
Sheets("Tabelle1").Select
ActiveSheet.Protect "Passwort1"
Sheets("Tabelle2").Select
ActiveSheet.Protect "Passwort2"
End Sub


Sub passwort_aus()
Sheets("Tabelle1").Select
ActiveSheet.Unprotect "Passwort1"
Sheets("Tabelle2").Select
ActiveSheet.Unprotect "Passwort2"
End Sub

Gruß Holger
Anzeige
Select ist dabei aber unnötig! oT
04.11.2009 12:48:49
Matthias5
AW: @all
05.11.2009 11:35:02
liese
Danke an Euch Helfer!
Bin weitergekommen.
MIT OHNE Select ;-)
Viele Grüße
Anneliese

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige