Sperren von sheets
22.07.2003 10:36:54
Thorsten
ich hoffe, ihr könnt mir helfen. Ich komm einfach nicht weiter.
Ich habe alle Sheets in meiner Excel-Application gesperrt. Es sollen alle Zellen komplett gesperrt, d.h. nicht mehr anklickbar sein. Das funzt auch ganz gut.
Jetzt das Problem. Mit VBA-Code möchte ich nicht nur neue values in die zellen schreiben, sonder z.b. auch neue zeilen einfügen oder linestyle-eigenschaften setzten, was bei einem gesperrten sheet aber nicht geht. Daher dachte ich mir, dass ich das sheet also erst entsperren muss. Am Beginn von Prozeduren, die wegen der gesperrten sheets Fehler werfen, schreibe ich also:
activesheet.Unprotect
Am Schluß dann wieder:
activesheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
(Das hab ich mit dem makrorekorder so aufgezeichnet)
Leider sind nach Ausführen der Prozedur die zellen der sheets wieder anklickbar.
Ich hoffe, ihr wisst eine Lösung,
Thorsten