Herbers Excel-Forum - das Archiv

Bedingtes Sperren (?)

Bild

Betrifft: Bedingtes Sperren (?)
von: Philipp

Geschrieben am: 18.02.2005 10:17:34
Gibt es die Möglichkeit, eine Zelle folgendermassen zu bearbeiten:
Wenn "WortA" ist die Zelle nicht gesperrt.
Wenn WortB - Wort Z" ist die Zelle gesperrt.
Geht sowas irgendwie?
Gruß
Philipp
Bild

Betrifft: AW: Bedingtes Sperren (?)
von: Bernhard
Geschrieben am: 18.02.2005 10:38:57
..... Gültigkei im Menü Daten ?
Bild

Betrifft: AW: Bedingtes Sperren (?)
von: Gerd
Geschrieben am: 18.02.2005 10:59:11
Verwendest du den Blattschutz? Wenn ja, mit oder ohne Passwort?
Gerd
Bild

Betrifft: AW: Bedingtes Sperren (?)
von: Philipp
Geschrieben am: 18.02.2005 11:09:12
Ja! Mit Passwortschutz
Bild

Betrifft: AW: Bedingtes Sperren (?)
von: Harald E

Geschrieben am: 18.02.2005 11:02:07
Hallo Philipp,
hier ein vba Ansatz für den Bereich A1 bis F20 (anpassen)
Sub Makro1()
Dim zelle As Range
Dim Bereich As Range
Set Bereich = Range("a1:f20")
ActiveSheet.Unprotect
For Each zelle In Bereich
If zelle.Value = "WortA" Then
zelle.Locked = False
End If
Next
ActiveSheet.Protect
End Sub

Gruß
Harald
 Bild