Habe das jetzt Mal ausprobiert, bekomme aber leidern den Fehler "Die Locked-Eigenschaft des Range-Objektes kann nichtfestgelegt werden."
Folgende Zeile ist gelb markiert.
Target.Offset(0, 3).Locked = True
Habe das den Blattschutz per Passwort erst einmal weggelassen, nur Blattschutz ohne PW reingemacht.
Kurze Frage noch, bin eher blutiger Anfänger in vba
Was bewirken folgende Befehle:
If Target.Column <> 1 Then Exit Sub
If Target.Count > 1 Then
Was bewirkt
Target.Column ...
Target.Count ...?
If Target.Offset(0, 1).Value = "Profil 2" Then
Target.Offset(0, 3).Locked = False
Else
Target.Offset(0, 3).Locked = True
Wie ist der Wert/Befehl Target.Offset (0, 1) zu verstehen, was bedeuten die Angaben in den Klammern?
Vielen Danke für Deine/Eure Zeit
|