Zellenschutz
29.08.2002 10:44:45
Silke
ich habe hier mal einen Code gefunden für Zellenschutz.
Private Sub Worksheet_Change
(ByVal Target As Excel.Range)
If Target = Range ("$F$12") Then
Application.EnableEvents=False
Application.Undo
Application.EnableEvents=True
Dabei wird die Zelle F12 ohne Blattschutz geschützt.
Kann man das auf mehre Zellen (1 Spalte) anpassen?
Meine Programmierkenntisse sind gering, Nutze aber gerne diese Anwendungen.
Vielen Dank
Silke