Mit dem folgenden VBA-Code können Sie abwechselnd die Zeilen eines markierten Bereiches mit zwei bestimmten Farben automatisch einfärben. Im folgenden Makro werden die Zeilen des markierten Bereiches automatisch abwechselnd gelb und grau eingefärbt. Wenn Sie eine andere Hintergrundfarbe verwenden wollen, dann verändern Sie einfach den ColorIndex dementsprechend ab.
Sub ZeilenFärben()
Dim Zeile As Range, ZeilenNr As Integer
For Each Zeile In Selection.Rows
ZeilenNr = ZeilenNr + 1
If ZeilenNr Mod 2 = 0 Then
Zeile.Interior.ColorIndex = 6
Else
Zeile.Interior.ColorIndex = 15
End If
Next
End Sub