ich hab folgenden Code für Zellen bei Formel färben vom Forum:
Dim rng As Range, c As Range
Set rng = ActiveSheet.UsedRange
For Each c In rng
If c.HasFormula Then
c.Interior.ColorIndex = 15
End If
Next
kann man den erweitern, damit diese zellen -locked- werden und wenn ja wie ?
Gruss Ludicla.