Zellenschutz
15.12.2004 15:53:07
Janosch
Ich möchte in einem Blatt zeilen von A-Z sperren wenn in der entsprechenden Zeile in der Spalte A ein x oder X gesetzt wurde. Außerdem soll in Spalte AB die Meldung "Daten geschützt erscheinen und die Zeilen farbig unterlegt werden. Ich habe bereits ein drei Seiten Makro, aber vermutlich in dieser entscheidenden Zeile einen Fehler:
Range(Cells(vlRow - 1, 1), Cells(vlRow - 1, vlColumn - 1)).Locked = True
Message erscheint, Zeile wird eingefäbt, allerdings kann ich noch immer in der eigengtlich gesperrten Zeile Daten eingeben.
Ich wollte vorerst keinen mit dem kompletten Code erschlagen, könnte ihn aber auch hier zur Verfügung stellen. Für Kommentare wäre ich euch sehr dankbar. Jedoch muss ich noch darauf hinweisen, dass ich bisher nur einen Grundkurs in VBA absolviert habe :)