小编DaZ*_*aZn的帖子

我有一个包含一些合并单元格的表格,我希望通过VBA代码从第一行开始为每一行着色.

多数民众赞成我是如何尝试的:

Sub test()
    Dim Zeile As Long
    With Tabelle2
        For Zeile = 1 To .UsedRange(Rows.Count).End(xlUp).Row Step 2
         .Range(.Cells(Zeile, 1),.Cells(Zeile,8)).Interior.ColorIndex= 15
        Next
    End With
End Sub

该表如下所示:

应该是这样的:

先感谢您!