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

schreibschutz aufheben

Forumthread: schreibschutz aufheben

schreibschutz aufheben
11.10.2002 10:21:32
lydia
Hallo,
ich habe eine arbeitsmappe mit 5 blättern. auf einem blatt liegt ein schreibschutz. ich möchte jetzt aus vb heraus den schreibschutz aufheben, einen wert eintragen und den schreibschutz wieder setzen. kann mir jemand weiterhelfen?

Gruß

Lydia

Anzeige

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

Betreff
Datum
Anwender
Anzeige
habs gefunden
11.10.2002 10:51:05
lydia
danke fürs lesen, habe selbst ne möglichkeit gefunden
Re: schreibschutz aufheben
11.10.2002 10:55:07
stephan
Hallo!
So funktioniert es:
Public Sub test()
Sheets("test").Select
'Wählt das Blatt test aus
ActiveSheet.Unprotect ("test")
'Hebt den Schreibschutz mit Passwort test auf
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True, password:="test"
'Setzt den Schreibschutz mit Passwort test
End Sub

Gruß
Stephan
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige