Blätter schützen

Bild

Betrifft: Blätter schützen von: Ömer
Geschrieben am: 14.03.2005 23:43:58

Gute Nacht
bitte wie kann ich alle Blätter zusammen schützen, sonst dauer es eine Ewigkeit weil ich ca 1000 Blätter in einer Mappe habe
danle im voraus

Bild


Betrifft: AW: Blätter schützen von: MichaV
Geschrieben am: 15.03.2005 00:14:25

Hi Ömer,

Dim i As Integer

For i = 1 To Sheets.Count
Sheets(i).Protect Password:="Passwort" 'oder .Unprotect
Next i

Gruß- Micha


Bild


Betrifft: AW: Blätter schützen von: ömer
Geschrieben am: 15.03.2005 21:20:15

Vielen Dank Micha, es klappt wie immer!


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Feld schaltet v 0 auf 1, dann wird die KW eingetr"