Hallo,
ich habe mir einen Code zusammengebastelt. Hier wird die aktive Zeile eingefärbt. Leider hat der Code noch einen Fehler:
- beim ersten Zellenwechsel nach dem Start bleibt die vorher markierte Zeile farbig. Diese sollte aber wieder entfärbt werden.

Kann mir hier jemand helfen?

Mein Code:

Option Explicit

Dim rngVorher As Range
Dim colVorher As Integer
Private Sub Worksheet_Deactivate()
  If Not rngVorher Is Nothing Then rngVorher.Interior.ColorIndex = colVorher
  Set rngVorher = Nothing
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
  Static AlteZeile As Integer

  If Not rngVorher Is Nothing Then rngVorher.Interior.ColorIndex = colVorher
    
  If AlteZeile <> 0 Then
    Range(Cells(AlteZeile, 1), Cells(AlteZeile, 29)).Interior.ColorIndex = xlColorIndexNone
    Range(Cells(Target.Row, 1), Cells(Target.Row, 29)).Interior.ColorIndex = 22
  End If

  Set rngVorher = Target
   colVorher = Target.Interior.ColorIndex
    Target.Interior.ColorIndex = 6  'Hintergrund Gelb

  AlteZeile = Target.Row

End Sub

Vielen Dank
Boernie