Zeilen färben
07.12.2006 11:28:15
helena
geht dies auch wenn ich zwei Bereiche möchte
zB A1:G20 mit blau
A21:G40 mit gelb (Farbe 6)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Rows.Interior.ColorIndex = xlColorIndexNone
Rows(Target.Row).Interior.ColorIndex = 6
End Sub
Problem könnte noch sein beim Druck sollte Eintrag wieder weg
sein bzw. die Farbe wieder wie Orginal
Danke für Hilfe
gruss helena
Anzeige