Innholdsfortegnelse
Denne korte opplæringen forklarer hvordan du sletter annenhver rad i Excel ved å filtrere eller med VBA-kode. Du vil også lære hvordan du fjerner hver 3., 4. eller en hvilken som helst annen N. rad.
Det er mange situasjoner der du kanskje må slette alternative rader i Excel-regneark. Det kan for eksempel være lurt å beholde data for partallsuker (rad 2, 4, 6, 8 osv.) og flytte alle oddeuker (rader 3, 5, 7 osv.) til et annet ark.
Vanligvis koker det å slette annenhver rad i Excel ned til å velge alternative rader. Når radene er valgt, er et enkelt slag på Slett -knappen alt som skal til. Videre i denne artikkelen vil du lære noen teknikker for raskt å velge og slette annenhver eller hver N. rad i Excel.
Hvordan slette annenhver rad i Excel ved å filtrere
I hovedsak er en vanlig måte å slette annenhver rad i Excel denne: Først filtrerer du alternative rader, velger dem og sletter alle på en gang. De detaljerte trinnene følger nedenfor:
- I en tom kolonne ved siden av de opprinnelige dataene dine, skriv inn en sekvens med nuller og enere. Du kan raskt gjøre dette ved å skrive 0 i den første cellen og 1 i den andre cellen, deretter kopiere de to første cellene og lime dem inn i kolonnen til den siste cellen med data.
Alternativt kan du bruke denne formelen:
=MOD(ROW(),2)Formelens logikk er veldig enkel: ROW-funksjonen returnerer gjeldende radnummer, MOD-funksjonendeler den med 2 og returnerer resten avrundet til heltall.
Som et resultat har du 0 i alle partallsrader (fordi de er delt med 2 jevnt uten rest) og 1 i alle oddetallsrader:
- Avhengig av om du vil slette partalls- eller oddetallsrader, filtrer ut enere eller nuller.
For å få det gjort, velg en hvilken som helst celle i hjelpekolonnen, gå til Data -fanen > Sorter og filtrer -gruppen, og klikk på Filter knapp. Nedtrekksfilterpilene vises i alle overskriftsceller. Du klikker på pilknappen i hjelpekolonnen og merker av i en av boksene:
- 0 for å slette partallsrader
- 1 for å slette oddetallsrader
I dette eksemplet skal vi fjerne radene med "0"-verdier, så vi filtrerer dem:
- Nå som alle "1"-rader er skjult, velg alle synlige "0"-rader, høyreklikk på utvalget og klikk Slett rad :
- Trinnet ovenfor har etterlatt deg med en tom tabell , men ikke bekymre deg, "1"-radene er der fortsatt. For å gjøre dem synlige igjen, fjern ganske enkelt autofilteret ved å klikke Filter -knappen igjen:
- Formelen i kolonne C beregner på nytt for de gjenværende radene, men du trenger det ikke lenger. Du kan nå trygt slette Helper-kolonnen:
Som resultat er det bare partallsukene igjen i regnearket vårt, de oddetallsukene er borte!
Tips. Hvis du ønsker å flytte hverannen rad til et annet sted i stedet for å slette dem helt, kopier først de filtrerte radene og lim dem inn på et nytt sted, og slett deretter de filtrerte radene.
Hvordan slette alternative rader i Excel med VBA
Hvis du ikke er villig til å kaste bort tiden din på en triviell oppgave som å slette annenhver rad i Excel-regnearkene dine, kan følgende VBA-makro automatisere prosessen for deg:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Velg området" , SourceRange.Address, Type :=8) Hvis SourceRange.Rows.Count >= 2 Deretter Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) Til 1 trinn -2 Sett FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdat End If End SubHvordan slette annenhver rad i Excel ved hjelp av makroen
I sett inn makroen i regnearket på vanlig måte via Visual Basic Editor:
- Trykk Alt + F11 for å åpne Visual Basic for Applications-vinduet.
- På den øverste menylinjen, klikk Sett inn > Modul , og lim inn makroen ovenfor i Modul
- Trykk på F5-tasten for å kjøre makroen.
- En dialogboks vil dukke opp og ber deg velge et område. Velg tabellen og klikkOK:
Ferdig! Annenhver rad i det valgte området slettes:
Hvordan slette hver n. rad i Excel
For denne oppgaven skal vi utvide filtreringen teknikk som vi har brukt til å fjerne annenhver rad. Forskjellen ligger i formelen som filtreringen er basert på:
MOD(ROW()- m, n)Hvor:
- m er radnummeret til den første cellen med data minus 1
- n er den N. raden du vil slette
La oss si at dataene dine begynner i rad 2 og du vil slette hver tredje rad. Så i formelen din er n lik 3, og m er lik 1 (rad 2 minus 1):
=MOD(ROW() - 1, 3)
Hvis dataene våre begynte i rad 3, så vil m være lik 2 (rad 3 minus 1), og så videre. Denne korreksjonen er nødvendig for å nummerere radene sekvensielt, og starter med tallet 1.
Det formelen gjør er å dele et relativt radnummer med 3 og returnere resten etter divisjon. I vårt tilfelle gir det null for hver tredje rad fordi hvert tredje tall deler på 3 uten rest (3,6,9, osv.):
Og nå, du utfør de allerede kjente trinnene for å filtrere "0"-rader:
- Velg en hvilken som helst celle i tabellen og klikk på Filter -knappen på Data
- Filtrer hjelpekolonnen for å vise bare "0"-verdier.
- Velg alle de synlige "0"-radene, høyreklikk og velg Slett rad fra hurtigmenyen.
- Fjern filteret ogslett hjelpekolonnen.
På lignende måte kan du slette hver 4., 5. eller en hvilken som helst annen N. rad i Excel.
Tips. I tilfelle du trenger å fjerne rader med irrelevante data, vil følgende veiledning være nyttig: Slik sletter du rader basert på celleverdi.
Jeg takker for at du leste og håper å se deg på bloggen vår igjen neste uke .
