VBA jede zweite Zeile färben
11.01.2018 10:38:06
MikeW
ich möchte gerne jede zweite Zeile meines Reiters färben.
Nur ist mein Problem, das es bis Spalte AC gehen soll und nicht weiter.
Ich verwende folgenden Code, könnt ihr mir bitte sagen was ich ändern muss damit es nur bis Spalte AC geht?
Vielen Dank im Voraus.
Gruß Michael
Private Sub ()
With Tabelle2
For Zeile = 5 To .UsedRange.Rows.Count
If Zeile Mod 2 = 0 Then
.Rows(Zeile).Interior.ColorIndex = 15
End If
Next Zeile
End With
End Sub