Zeilenfarbe
05.11.2012 16:40:34
serge
wie kann ich dieses Makro nur auf Zeile 5 bis 23 beschränken
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
' Alle Farben in Tabelle löschen
Cells.Interior.ColorIndex = xlNone
' neue Zeile einfärben
Rows(Target.Row).Interior.ColorIndex = 33
End Sub
Danke Serge