Hoe snel lege/lege rijen invoegen in Excel?
De meesten van ons komen het probleem tegen in Excel dat we een lege rij tussen elke bestaande rij moeten invoegen, en we weten allemaal hoe we handmatig een lege rij kunnen invoegen. Maar het invoegen van honderden lege rijen zal een tijdrovende taak zijn als je elke rij afzonderlijk invoegt. Hier zijn enkele snelle trucs om je bij dit probleem te helpen.
Voeg lege rijen in met de Sorteerfunctie
Snel specifieke aantallen lege rijen invoegen met Kutools voor Excel
Wisselende lege rijen invoegen met VBA-code
Voeg lege rijen in met de Sorteerfunctie
Deze methode is eenvoudiger maar omslachtig om lege rijen tussen bestaande rijen in te voegen. Je kunt als volgt te werk gaan:
1. Je hebt een lege kolom nodig naast je gegevens. Bijvoorbeeld, ik heb een werkblad dat A1:E9 omvat, dan kun je kolom F gebruiken.
2. Voer het getal 1 in cel F1 in en voer 2 in cel F2 in.
3. Selecteer het getal 1 en het getal 2, en dubbelklik op het vulhandvat, Excel zal automatisch de cellen in kolom F invullen.
4. Kopieer vervolgens deze nieuwe kolom F (F1:F9), selecteer cel F10, en plak de automatisch ingevulde nummers van F1:F9. Zie screenshot:
5. Klik vervolgens op Gegevens > Sorteren, en er verschijnt een Sorteren-waarschuwingsvenster, selecteer de Selectie uitbreiden optie, en klik op Sorteren… Zie screenshot:
6. Er verschijnt een Sorteren-venster, kies nummer 1 uit de Sorteren op dropdownlijst en klik vervolgens op de OK-knop. Zie screenshot:
Dan zijn de nieuwe lege rijen ingevoegd tussen de bestaande rijen. Zie screenshot:
Opmerking: Als je twee of drie lege rijen tussen elke rij wilt invoegen, kun je de nieuwe automatisch ingevulde kolom twee of drie keer kopiëren om de nieuwe rijen toe te voegen.
Snel specifieke aantallen lege rijen invoegen met Kutools voor Excel
De bovenstaande twee methoden verwijzen alleen naar het invoegen van lege rijen tussen elke rij, voor het invoegen van een lege rij of meerdere rijen na elke n-de rij, wat moet je dan doen? Hierbij beveel ik de Invoegen Lege Rijen & Kolommen hulpmiddel van Kutools voor Excel aan. Deze tool kan helpen om snel specifieke aantallen lege rijen na elke n-de rij in een bepaald bereik in te voegen. Doe als volgt.
1. Selecteer het bereik waarin je de lege rijen wilt invoegen, en klik op Kutools > Invoegen > Invoegen Lege Rijen & Kolommen. Zie screenshot:
2. Kies in het Invoegen Lege Rijen & Kolommen venster Lege rijen in de sectie Invoegtype , specificeer het aantal intervalrijen waarop je lege rijen wilt invoegen en het aantal rijen dat je wilt invoegen, en klik vervolgens op de OK-knop. Zie screenshot:
>
Dan zie je dat er bepaalde lege rijen zijn ingevoegd na elke twee rijen. Zie screenshots:
Opmerking: het getal in Interval van en Rijen kan worden aangepast om aan je behoefte te voldoen. Bijvoorbeeld, je kunt drie, vier, vijf… lege rijen invoegen na elke één, twee, drie… rijen.
Als u een gratis proefperiode (30-dag) van dit hulpprogramma wilt, klikt u op de link om het te downloaden, en gaat u vervolgens naar de bewerking toepassen volgens de hierboven beschreven stappen.
Wisselende lege rijen invoegen met VBA-code
Als de bovenstaande manier een beetje complex is, kun je de volgende VBA-code gebruiken om het probleem op te lossen.
1. Druk op de toetsen Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module en voer de volgende code in de Module in:
VBA-code: Lege rijen invoegen in Excel
Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub2. Klik vervolgens op 
knop of druk op de F5-toets om de code uit te voeren. In het pop-upvenster Kutools voor Excel, selecteer het bereik waarin je lege rijen wilt invoegen, en klik vervolgens op de OK-knop. Zie screenshot:
Dan is er een nieuwe lege rij ingevoegd tussen elke twee rijen. Zie screenshot:
Gerelateerde artikelen
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen