Beispiel zur Row-Eigenschaft

In diesem Beispiel wird die Höhe jeder zweiten Zeile in Sheet1 auf 4 Punkt festgelegt.

For Each rw In Worksheets("Sheet1").Rows
    If rw.Row Mod 2 = 0 Then
        rw.RowHeight = 4
    End If
Next rw