Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
916to920
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
916to920
916to920
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Blattschutz durch Makro aufheben/setzen

Blattschutz durch Makro aufheben/setzen
17.10.2007 20:31:55
KiaOra
Hi Ihr, ;-)
würde gerne in einer Datei mit geschützten Zellen auch einige Makros laufen lassen.
Problem: Läuft ein Makro über die geschützten Zellen, stoppt es...
Weiss jemand von Euch, wie ich per VBA beim Starten des Makros den Blattschutz mit Passwort (PW bekannt) aufheben u. am Ende des Makros wieder setzen kann?
Danke für jeden Tipp!
VG u. machts gut,
Micha

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

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz durch Makro aufheben/setzen
17.10.2007 20:41:00
Wolfgang
Hallo Micha,
habe folgenden Code selbst für mich dabei entdeckt, hoffe es ist das, was Du suchst.
Gruß - Wolfgang
'Blattschutz aufheben, zu Beginn des Codes
ActiveSheet.Unprotect ("*****")
'Blattschutz wieder einschalten, zum Ende des Codes
ActiveSheet.Protect ("****")

AW: Blattschutz durch Makro aufheben/setzen
17.10.2007 20:44:00
KiaOra
Hi Wolfgang,
klasse - genial - funzt! :-)
Vielen Dank für die schnelle Antwort !!!
VG u. einen schönen Abend,
Micha

Gerne geschehen
17.10.2007 20:47:55
Wolfgang
o.T.

AW: Blattschutz durch Makro aufheben/setzen
17.10.2007 20:43:13
Claudia
Hallo Micha!
Folgender Befehl sollte den Schutz aufheben:
ActiveSheet.Unprotect Password:="Passwort"
Neuer Blattschutz am Ende der Prozedur:
ActiveSheet.Protect Password:="Passwort", DrawingObjects:=True, _
Contents:=True, Scenarios:=True
Ich weiß zwar nicht, ob das besonders professionell ist, aber es sollte klappen.
Liebe Grüße!
Claudia

Anzeige
AW: Blattschutz durch Makro aufheben/setzen
17.10.2007 20:47:17
tino
Hallo,
schützen
sheets("Tabelle1").protect "Password"
schutz aufheben
sheets("Tabelle1").unprotect "Password"
Gruß Tino

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige