Hingergrundfarbe ändern bei Änderung in Spalte
04.01.2017 20:06:37
Daniel
ich versuche die Hintergrundfarbe in einer Zelle anzupassen wenn man in die Zelle eine 1,2,3 bis 9 schreibt. Also für jede Zahl eine andere Farbe.
Für eine Zelle hab ich das bisher wunderbar rausgefunden "Range("A3")" und das funktioniert auch. Jetzt wollte ich das auf Spalte A ausweiten klappt aber so wie da unten irgendwie nicht?!?! Columns ist doch für Spalte oder nicht?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range(Columns("A:A")) = 1 Then
ActiveCell.Interior.ColorIndex = 4 'hellgrün
End If
End Sub
Gruß
Daniel