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

Forumthread: Sperren von Zellen

Sperren von Zellen
30.11.2006 17:32:12
Zellen
Hi Leute,
ich versuch gerade ohne erfolg zellen innerhalb eines Worksheets teilweise zu sperren und freizulassen.
Mein Ansatz:
1 For Each WS In ActiveWorkbook.Worksheets
2 WS.Protect
3 WS.Range("I131:AM1000").Locked = False
4 Next
Wobei ich einen fehler bekomme mir der 4ten Zeile.
Kann mir da jemand aushelfen?
Danke im voraus,
Johannes
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Sperren von Zellen
30.11.2006 17:43:27
Zellen
Hallo Johannes

Sub t()
Dim WS As Worksheet
For Each WS In ActiveWorkbook.Worksheets
WS.Unprotect
WS.Range("I131:AM1000").Locked = False
WS.Protect
Next WS
End Sub

Gruss
Chris
PS: Bitte jeweils exakte Fehlermeldung angeben.
AW: Sperren von Zellen
30.11.2006 17:44:04
Zellen
1 For Each WS In ActiveWorkbook.Worksheets
2 WS.Range("I131:AM1000").Locked = False
3 WS.Protect
4 Next
mfg Kurt
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige