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

Blettschutz aktivieren und deaktivieren mit Makro!

Forumthread: Blettschutz aktivieren und deaktivieren mit Makro!

Blettschutz aktivieren und deaktivieren mit Makro!
29.12.2005 20:22:02
Swen
Hallo an alle,
wie muss ein Makro aussehen mit dem ich
ein Tabellenblattschutz (keine schreib rechte in die zellen)
mit dem Passwort (z.B. wolf") aussehen!
und wie das makro mit dem ich diesen makro schutz aufheben kann!
gruß
swen
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blettschutz aktivieren und deaktivieren mit Makro!
29.12.2005 20:28:59
Rocky
Hallo Sven,
Lass doch einfach mal den Recorder laufen. - fertig-
Gruß Rocky

Wenn unter den Blinden der Einäugige König ist, dann findet man hier die Herren der Ringe!
Anzeige
Nachtrag
29.12.2005 20:36:26
Rocky
Ich Korrigiere mich, das klappt nicht ganz
Schützen:
ActiveSheet.Protect Password:= "Wolf", DrawingObjects:=True, Contents:=True, Scenarios:=True
Aufheben:
Activesheet.Unprotect Password:= "Wolf"
Gruß Rocky

Wenn unter den Blinden der Einäugige König ist, dann findet man hier die Herren der Ringe!
Anzeige
AW: Nachtrag
29.12.2005 20:38:22
Swen
Hallo Rocky,
vielen Dank!
gruß
Swen
AW: Blttschutz aktivieren und deaktivieren mit Makro!
29.12.2005 20:37:29
Swen
Hallo Rocky,
Ich habe dieses über den Makrorecorder bekommen,
ich frage mich aber gerade wo hier das Passwort steht?

Sub Makro1()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub



Sub Makro2()
ActiveSheet.Unprotect
End Sub

Gruß
Swen
Anzeige
AW: Blettschutz aktivieren und deaktivieren mit Makro!
30.12.2005 08:48:48
Harald
Hallo Swen,
das Passwort wird beim Makrorecorder nicht mit aufgezeichnet.
Folgende Codes benutzte ich:
'Blattschutz raus ("Passwort")
ActiveSheet.Unprotect ("Passwort")
'Blattschutz rein ("Passwort")
ActiveSheet.Protect ("Passwort")
'Benutzer darf ungeschützte Zellen auswählen
ActiveSheet.EnableSelection = xlUnlockedCells
'Benutzer darf keine Zellen auswählen
ActiveSheet.EnableSelection = xlNoSelection
Gruß, Harald G. aus Köln
Anzeige
AW: Blettschutz aktivieren und deaktivieren mit Makro!
01.01.2006 10:02:11
Swen
.vielen Dank!
gruß
swen

Beliebteste Forumthreads (12 Monate)

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