ich möchte gerne per Automation bestimtme Zeilen ein- bzw. ausblenden lassen!
Beginnend ab der Zeile 5 sollen jeweils 7 Zeilen aus- bzw. eingeblendet werden!
Die Schritte (Step) wären dann 8!!!
ALles klar? :-)
Beispiel im Bild
Danke
Michi
Sub ausblenden()
Dim i As Integer, j As Integer
For i = 1 To 236 Step 8
For j = 1 To 7
Rows(3 + i + j).Hidden = True
Next
Next
End Sub