Zeile farbig markieren
18.10.2018 14:05:59
Marquardt
ich habe folgendes Problem.
Die Zeile wird nur markiert, wenn das Tabellenblatt nicht geschützt ist.
Gibt es eine Möglichkeit bei geschützten Tabellenblatt?
Vielen Dank.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer
Cells.Interior.ColorIndex = xlNone
i = ActiveCell.Row
If i >= 2 Then Range(Cells(i, 1), Cells(i, 9)).Interior.ColorIndex = 8
End Sub