Hallo Zusammen,
ich habe einen Code, der Zellen entsperren soll, falls diese als "bearbeitbar" deklariert sind.
Leider funktioniert dies nicht bei verbundenen Zellen und der Code bricht bei ".Locked = False" ab.
Gibt es da einen Ausweg?
Hier der Code:
If Cell.Offset(2).Value = "bearbeitbar" Then
With Range(Cell.Text)
.Locked = False
.Value = .Value
.Interior.Color = vbYellow
End With
End If
Next
Vielen Dank und Viele Grüße
Basti