Microsoft Excel

Herbers Excel/VBA-Archiv

Zellen sperren

Betrifft: Zellen sperren von: LOLO
Geschrieben am: 14.09.2004 18:25:31

Hallo! Ist es möglich, im Excel eine Einstellung vorzunehmen, die veranlasst, dass einzelne Zellen sofort nach dem Eintragen eines Wertes gesperrt/ geschützt werden. Es sollen also nur die Zellen gesperrt/ geschützt sein, die bereits einen Wert enthalten.

Vielen Dank

  


Betrifft: AW: Zellen sperren von: Piet
Geschrieben am: 14.09.2004 18:34:13

Und was, wenn eine Korrektur nötig wird?

Piet


  


Betrifft: AW: Zellen sperren von: Mike E.
Geschrieben am: 14.09.2004 18:48:21

Hallo ?,

weise diesen Code im VB-Editor der Selection_Change-Eigenschaft des entsprechenden Tabellenblattes zu (Der berich, der hier jeweils geschützt wird liegt in A1:E100):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim zelle As Range
Dim ws As Range
Set ws = Range("A1:E100")
For Each zelle In ws

If zelle <> "" Then
ActiveSheet.Unprotect
zelle.Locked = True
ActiveSheet.Protect
End If
Next zelle

End Sub


Viele Grüße
Mike


  


Betrifft: AW: Danke O´T von: LOLO
Geschrieben am: 14.09.2004 19:35:51

.


 

Beiträge aus den Excel-Beispielen zum Thema "Zellen sperren"