Hallo zusammen,
mit dem untenstehenden Makro durchlaufe ich auf einem Tabellenblatt alle Zellen und prüfe, ob die Farbnummer 13434828 (Hellgrün) in der jeweiligen Zelle vorhanden ist und entferne dann den Zellschutz.
For Each Zelle In Blatt.UsedRange
If Zelle.Interior.Color = 13434828 Then
Zelle.Locked = False
End If
Next Zelle
Soweit funktioniert dies auch. Wenn aber hellgrün hinterlegte Zellen verbunden sind, kommt es zum Laufzeitfehler 1004 "Die Locked-Eigenschaft des Range-Objektes kann nicht festgelegt werden" und der Zellschutz wird nicht entfernt.
Gibt es eine Lösung, denn Zellschutz auch bei verbundenen Zellen zu entfernen?
Danke für eure Tipps
Armin