Aktive Zeile farbig markieren

Problem: Wenn Werte in einer Zeile bearbeitet werden, die sehr viele Spalten hat, ist schwer zu erkennen, in welcher Zeile man sich befindet. Deshalb soll die Zeile farbig hervorgehoben werden.

Lösung:

Hinterlegen Sie folgenden Code des Tabellenblattes, indem Sie:

• Den Entwicklermodus aktivieren (Datei / Optionen / Menüband anpassen: dort „Entwicklertools“ aktivieren.
• Dann Entwicklertools aufrufen und dort „Visual Basic“ öffnen
• Dann Tabellenblatt doppelt anklicken und den Code eingeben.

entweder:

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Rows.Interior.ColorIndex = xlColorIndexNone
    Rows(Target.Row).Interior.ColorIndex = 6
  End Sub

oder:

  Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    Cells.Interior.ColorIndex = xlNone
    Rows(Target.Row).Interior.ColorIndex = 35
  End Sub

Hinweis:
Die Farben anderer, bisheriger farbigen Zellen werden leider gelöscht.