Hoe voeg ik in Excel lege rijen in?

[anoniem]

In een vrij lange kolom met waarden wil ik ervoor zorgen dat tussen elke cel (waarin een getal/tekst staat) vier lege regels worden tussengevoegd. Handmatig steeds vier rijen invoegen wordt onmogelijk dus hoop ik dat iemand mij kan helpen met een manier om dit voor elkaar te krijgen...

[anoniem]

Met de volgende macro voeg je 4 lege rijen toe tussen de bestaande cellen. Voorwaarde is wel dat er geen lege cellen staan in de tabel. De macro stopt namelijk bij de 1e lege cel. Maak de 1e cel van je tabel actief en run de macro. Sub Test3() Dim i As Integer For i = 1 To Selection.CurrentRegion.Rows.Count - 1 ActiveCell.Offset(1, 0).Range("A1:A4").Select Selection.EntireRow.Insert ActiveCell.Offset(4, 0).Select Next i End Sub Eerst een kopie maken van je werkblad!