VBA farbige Zeile Problem
10.12.2015 09:05:01
Erik
Habe folgenden Code in meiner Tabelle:
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column = 14 And .Value = "a" Then
Cells(.Row, 1).Resize(1, 12).Interior.ColorIndex = 3
Else
Rows(.Row).Interior.ColorIndex = xlNone
End If
End With
End Sub
Dieser funktioniert so wie ich will bis auf das Problem:sobald ich irgendetwas in der Spalte 1-13 eingebe wird die Zeile wieder weiß.
Sie sollte aber rot bleiben.
Gibts da eine Möglichkeit ?
Gruß
Erik