X Leere Zeilen einfügen
10.08.2019 19:41:57
Stephan
ich möchte ab Zeile 17 24 neue Zeilen einfügen.
Bisher habe ich folgendes versucht:
Klappt leider nicht wie gewünscht. Freue mich über Korrektur oder Alternativen.
Grüße
Stephan
Sub Test()
Dim i As Integer
Sheets("Tabelle1").Range.("A17").Select
For i = 17 To 24 Step 1
ActiveSheet.Cells(ix, 1).EntireRow.Insert
Next i
End Sub