Hoe kan ik snel elke andere rij in Excel verwijderen?

Hoe snel elke andere rij verwijderen in Excel?

Als u snel elke andere rij of kolom wilt verwijderen in Excel, is het belangrijkste punt hoe u snel elke andere rij of kolom eerst kunt selecteren en vervolgens de verwijderbewerking op hen kunt toepassen. En dit artikel zal u enkele lastige dingen laten zien over hoe u eerst elke andere rij of kolom kunt selecteren en deze vervolgens snel kunt verwijderen.

Alle andere rijen in Excel verwijderen met Filter commando

Alle andere rijen in Excel verwijderen met VBA code

Alle andere rijen of kolommen in Excel verwijderen met Kutools for Excel

Verwijder elke andere rij in Excel met Filter commando

Microsoft Excel’s Filter commando kan u helpen om snel elke andere rij te filteren en ze dan in een keer te verwijderen, doe het als volgt:

1. Voer in een lege kolom naast de oorspronkelijke gegevens 0,1,0,1…,0,1 in. In dit geval voeren we de getallen in in de hulpkolom C. Zie de volgende schermafbeelding:

2. Selecteer de kolom C en klik op de knop Filter op het tabblad Gegevens. Klik vervolgens op de pijlknop naast C1, en vink alleen de 0 aan bij de optie Alles selecteren. Zie schermafbeelding:

3. Vervolgens worden alle rijen met 1 verborgen. Selecteer de zichtbare rijen met 0, en klik op de Home > Delete > Delete sheet rijen om deze rijen te verwijderen. Vervolgens worden alle andere rijen verwijderd, en moet u opnieuw op de knop Filter klikken om alleen de rijen met 1 weer te geven. Zie schermafbeeldingen:

4. Ten slotte kunt u de hulpkolom C verwijderen zoals u nodig hebt.

Verwijder elke andere rij in Excel met VBA code

Eigenlijk, VBA macro is ook een goede keuze om dit probleem op te lossen.

1. Houd de toetsen Alt + F11 ingedrukt in Excel, en het Microsoft Visual Basic for Applications-venster wordt geopend.

2. Klik op > Module invoegen, en plak de volgende macro in het Module-venster.

VBA-code: Verwijder elke andere rij in de selectie:

Sub DeleteEveryOtherRow()'Updateby ExtendofficeDim rng As RangeDim InputRng As RangexTitleId = "KutoolsforExcel"Set InputRng = Application.SelectionSet InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)Application.ScreenUpdating = FalseFor i = InputRng.Rows.Count To 1 Step -2 Set rng = InputRng.Cells(i, 1) rng.EntireRow.DeleteNextApplication.ScreenUpdating = TrueEnd Sub

3. Druk op de toets F5 om deze macro uit te voeren. Er verschijnt een dialoogvenster voor het selecteren van een bereik. Zie screenshot:

4. Klik vervolgens op OK, elke andere rij in het geselecteerde bereik vanaf de tweede rij wordt in één keer verwijderd, zie schermafbeelding:

Verwijder elke andere rij of kolom in Excel met Kutools for Excel

Voor een beginnende gebruiker van Microsoft Excel, het gebruik van VBA macro is een beetje ingewikkeld. Het hulpprogramma Select Interval Rijen & Kolommen van Kutools for Excel kan u helpen elke andere rij snel te verwijderen.

Kutools for Excel : met meer dan 300 handige Excel-toevoegingen, gratis te proberen zonder beperking in 30 dagen.

Na de installatie van Kutools for Excel gaat u als volgt te werk:

1. Selecteer het bereik dat u om de andere rijen wilt verwijderen en pas dit hulpprogramma vervolgens toe door te klikken op Kutools > Selecteren > Intervalrijen selecteren & kolommen….

2. Geef in het dialoogvenster Selecteer intervalrijen & kolommen de instellingen op zoals in de volgende schermafbeelding en klik op de knop OK om eerst alle andere rijen te selecteren.

3. Vervolgens wordt elke andere rij in de selectie geselecteerd en gemarkeerd. Zie schermafbeelding:

4. Vervolgens kunt u de geselecteerde om de andere rijen snel verwijderen door te klikken op de knop Start > Wissen > Wis bladrijen om al deze rijen te verwijderen. Zie schermafbeeldingen:

Klik om meer te weten te komen over deze functie Select Interval Rijen & Kolommen.

Met deze functie kunt u ook elke n-de rijen of kolommen verwijderen zoals u nodig hebt.

Download en probeer Kutools for Excel nu gratis uit!

Demo: Elke andere rij of kolom verwijderen met Kutools for Excel