ColorIndex ändern
02.02.2006 22:27:48
Tristan
eine Frage, das Makro funktioniert.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 And Target.Value = "x" Then
Target.Offset(0, -4).Interior.ColorIndex = 3
Target.Offset(0, -3).Interior.ColorIndex = 3
Target.Offset(0, -2).Interior.ColorIndex = 3
Target.Offset(0, -1).Interior.ColorIndex = 3
End If
End Sub
Nur soll wenn man ein "x" wieder entfernt/löscht
die Zelle sich wieder auf normal sprich ColorIndex = 2 stellen.
Wie mach ich das am einfachsten ?
Danke für die Hilfe !!!