Anzeige
Archiv - Navigation
952to956
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
952to956
952to956
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

mit VBA Blattschutz

mit VBA Blattschutz
20.02.2008 21:36:00
Claudia
Nabend zusammen,
kann mir bitte jemand helfen, wie ich meinen nachstehenden Code zum setzten eines Blattschutzes ändern muss. Es muss noch der Haken bei "Nicht gesperrte Zellen auswählen" herausgenommen werden. Soll heißen nach setzten des Blattschutzes darf der User ABSOLUT NIX MEHR.

Sub Schutz_rein()
Dim wks As Worksheet
For Each wks In Worksheets
wks.Protect Password:="vwn_suche", DrawingObjects:=True, Contents:=True, Scenarios:=True
Next wks
End Sub


Danke Gruß
Claudi

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

Betreff
Datum
Anwender
Anzeige
AW: mit VBA Blattschutz
20.02.2008 21:57:06
Original
Hi,

Sub Schutz_rein()
Dim wks As Worksheet
For Each wks In Worksheets
wks.EnableSelection = xlNoSelection
wks.Protect Password:="vwn_suche", DrawingObjects:=True, Contents:=True, Scenarios:=True
Next wks
End Sub


mfg Kurt

vielen Dank o.T.
20.02.2008 22:14:06
Claudia
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige