Makro nach Eingabe einer Auswahlliste ausführen
02.06.2005 11:18:10
Christian
ich habe den Zellen in einer Spalte eine Auswahlliste zugefügt, nun möchte ich das abhängig von dem ausgewählten Eintrag die ganze Zeile farbig markiert wird(sofort nach der Eingabe oder beim Verlassen der Zelle!). Soweit so gut. Nun wird das Makro aber immer nur ausgeführt wenn ich die Zelle einmal verlassen und dann wieder markiert habe.
So sieht mein Makro aus :
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim Status As String
If Target.Column = 5 Then
Status = ActiveCell.Value
Select Case Status
Case "auf Termin"
Rows(Target.Row).Interior.ColorIndex = 30
Case "in Bearbeitung"
Rows(Target.Row).Interior.ColorIndex = 32
Case "Neu"
Rows(Target.Row).Interior.ColorIndex = 34
Case "Erledigt"
Rows(Target.Row).Interior.ColorIndex = 36
End Select
End If
End Sub
Wo ist mein Denkfehler ?
Gruß Christian