mein nachstehender Code bricht mit einem Laufzeitfehler ab, weil das Blatt geschützt ist, das Range jedoch ist eingabebereit.
Wo / wie muss ich verändern, dass im Range die Zellen farbig gekennzeichnet werden?
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Range("al9:bt100")
.Interior.ColorIndex = xlNone
.SpecialCells(xlCellTypeConstants, 1).Interior.ColorIndex = 3
End With
End Sub
Vielen Dank für die Hilfe.Grüße, Jörg