mit dem unten stehenden Code wird die ganze aktive Zeile farblich hinterlegt. Kann mir jemand den Code so anpassen, dass nur die Spalte B und C in der entsprechenden Zeile farblich markiert wird.
Vielen Dank im Voraus.
Grüße
Thomas
Dim Merk, Farbe
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Merk "" Then Rows(Merk).Interior.ColorIndex = Farbe
If Intersect(Target, Range("D21:M30")) Is Nothing Then Exit Sub
Merk = Target.Row
Farbe = Target.Interior.ColorIndex
Rows(Target.Row).Interior.ColorIndex = 43
End Sub