dachte das mach ich mit:
ActiveSheet.Protect Password:="geheim"
Grundsätzlich sind eh nur die drei Felder wo eingegeben werden kann freigegeben, der Rest vom Blatt ist gesperrt.
Wenn ich jetz:
ActiveSheet.Unprotect Password:="geheim"
ActiveSheet.Range("d10").Locked = True
ActiveSheet.Protect Password:="geheim"
mach, sind auch alle anderen Felder die vorher gespert waren gesperrt, aber mein .range("d10").locked macht nix.
mfg Thomas
|