Se video - Sett inn blank rad etter hver rad i Excel
Folk som jobber med store datasett trenger ofte enkle ting som å sette inn/slette rader eller kolonner.
Selv om det allerede er mange forskjellige (og enkle) måter å legge til rader i Excel, blir det litt komplisert når det gjelder å sette inn en tom rad etter annenhver rad (eller hver tredje eller fjerde rad).
Sett inn en tom rad etter annenhver rad
I denne opplæringen vil jeg vise deg noen veldig enkle måter å sette inn en tom rad etter hver rad i det eksisterende datasettet (eller hver niende rad).
Siden det ikke er noen direkte måte å legge til rader mellom radene, er metoden som dekkes i denne artikkelen løsninger for å få dette til å skje, og hvis du er komfortabel med VBA, kan du gjøre dette med et enkelt klikk.
Bruke hjelperkolonne og sorteringsfunksjonen
Anta at du har et datasett som vist nedenfor, og du vil sette inn et tomt mellom de eksisterende radene.
Nedenfor er trinnene for å sette inn tomme rader mellom eksisterende rader:
- Sett inn en tom kolonne til venstre for datasettet. For å gjøre dette, høyreklikk på kolonneoverskriften i venstre kolonne og klikk på Sett inn.
- Skriv inn teksten ‘HelperColumn’ i A1 (du kan bruke hvilken som helst tekst du vil)
- Skriv inn 1 i celle A2 og 2 i celle A3.
- Velg begge cellene og plasser markøren nederst til høyre i utvalget. Når markøren endres til et plussikon, dobbeltklikker du på det. Dette vil fylle hele kolonnen med økende tall
- Gå til den siste fylte cellen i hjelperkolonnen, og velg deretter cellen under den.
- Skriv inn 1 i denne cellen og 2 i cellen under den
- Velg begge cellene og plasser markøren nederst til høyre i utvalget.
- Når markøren endres til et plussikon, klikker du og drar det ned. Dette vil fylle en rekke tall (akkurat som vi kom i trinn 3). Sørg for at du får flere tall enn det du har i datasettet. For eksempel, hvis det er 10 poster i datasettet, må du sørge for å få minst 10 celler fylt ut i dette trinnet. Når du er ferdig, vil datasettet ditt se ut som vist nedenfor.
- Velg hele datasettet (inkludert alle cellene i hjelperkolonnen).
- Klikk kategorien Data
- Klikk på alternativet Sorter
- I dialogboksen Sorter bruker du følgende innstillinger:
- Sorter etter: Hjelper
- Sorter etter: Celleverdi
- Rekkefølge: Den minste til den største
- Klikk OK. Dette vil gi deg datasettet som vist nedenfor.
- Slett hjelperkolonnen.
Du vil legge merke til at så snart du klikker OK i dialogboksen Sorter, omorganiserer den øyeblikkelig radene og nå har du en tom rad etter hver rad i datasettet.
I virkeligheten er dette egentlig ikke å sette inn en tom rad. Denne sorteringsmetoden omorganiserer dataene ganske enkelt ved å plassere tomme rader under datasettet mellom radene i datasettet.
Du kan også utvide den samme logikken til sett inn en tom rad etter hver to eller hver tredje rad.
Anta at du har datasettet som vist nedenfor, og du vil få en tom rad etter hver annen rad.
Nedenfor er trinnene for å gjøre dette:
- Sett inn en tom kolonne til venstre for datasettet. For å gjøre dette, høyreklikk på kolonneoverskriften i venstre kolonne og klikk på Sett inn.
- Skriv inn teksten ‘HelperColumn’ i A1 (du kan bruke hvilken som helst tekst du vil)
- Skriv inn 1 i celle A2 og 2 i celle A3.
- Velg begge cellene og plasser markøren nederst til høyre i utvalget. Når markøren endres til et plussikon, dobbeltklikker du på det. Dette vil fylle hele kolonnen med økende tall
- Gå til den siste fylte cellen i hjelperkolonnen, og velg deretter cellen under den.
- Skriv inn 2 i denne cellen og 4 i cellen under den. Vi bruker tall i multipler av 2 ettersom vi vil ha en tom rad etter hver annen rad.
- Velg begge cellene og plasser markøren nederst til høyre i utvalget.
- Når markøren endres til et plussikon, klikker du og drar det ned. Dette vil fylle en rekke tall (akkurat som vi kom i trinn 3). Sørg for at du får et tall større enn det du har i datasettet. For eksempel, hvis det er 10 poster i datasettet, må du sørge for at du får minst til nummer 10.
- Velg hele datasettet (inkludert alle cellene i hjelperkolonnen).
- Klikk kategorien Data
- Klikk på alternativet Sorter
- I dialogboksen Sorter bruker du følgende innstillinger:
- Sorter etter: Hjelper
- Sorter etter: Celleverdi
- Rekkefølge: Den minste til den største
- Klikk OK. Dette vil gi deg det endelige datasettet som vist nedenfor (med en tom rad etter hver annen rad i datasettet)
- Slett hjelperkolonnen.
På samme måte, hvis du vil sette inn en tom rad etter hver tredje rad, bruker du tallet 3, 6, 9 og så videre i trinn 5.
Bruke en enkel VBA -kode
Selv om du trenger mange løsninger for å sette inn alternative, tomme rader i Excel, er VBA alt et stykke kake.
Med en enkel VBA -kode er alt du trenger å gjøre å velge datasettet der du vil sette inn en tom rad etter hver rad, og bare kjøre koden (tar et enkelt klikk).
Nedenfor er VBA -koden som vil sette inn en tom rad etter hver rad i datasettet:
Sub InsertAlternateRows () 'Denne koden vil sette inn en rad etter hver rad i utvalget' Denne koden er opprettet av Sumit Bansal fra trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Selection CountRow = rng. EntireRow.Count For i = 1 To CountRow ActiveCell.Offset (1, 0) .EntireRow.Insert ActiveCell.Offset (2, 0) .Velg Next i End Sub
Koden ovenfor teller det totale antallet rader i utvalget og bruker en For Next -sløyfe for å bla gjennom hver rad og sette inn en tom rad etter hver eksisterende rad i datasettet.
Her er trinnene for å plassere denne VBA -koden i VB Editor i Excel:
- Kopier koden ovenfor
- Gå til kategorien Utvikler og klikk på Visual Basic -alternativet. Dette åpner VB Editor. Du kan også bruke hurtigtasten ALT + F11
- Høyreklikk på et hvilket som helst objekt i Project Explorer i VB Editor
- Hold markøren over alternativet Sett inn, og klikk deretter på Modul. Dette vil sette inn en ny modul
- Lim inn koden ovenfor i modulkodevinduet.
Når du har koden i VB Editor, kan du nå bruke denne koden til å sette inn tomme rader etter hver annen rad i datasettet.
Her er trinnene for å bruke koden til å sette inn tomme rader etter hver rad:
- Velg hele datasettet (unntatt overskriftsraden)
- Klikk på Utvikler -fanen (hvis du ikke har kategorien Utvikler, klikk her for å lære hvordan du får den)
- Klikk på "Makroer" -alternativet
- I makro -dialogboksen velger du makroen - ‘InsertAlternateRows’
- Klikk på Kjør
Det er det!
De ovennevnte trinnene vil umiddelbart sette inn alternerende blanke rader i datasettet.
Det er mange forskjellige måter å kjøre en makro i Excel. For eksempel, hvis du må gjøre dette ganske ofte, kan du legge denne makroen til verktøylinjen for rask tilgang, slik at du kan kjøre den med et enkelt klikk.
Du kan lese mer om forskjellige måter å kjøre makroer på her.
Hvis du vil sette inn en tom rad etter hver annen rad, kan du bruke koden nedenfor:
Sub InsertBlankRowAfterEvery2ndRow () 'Denne koden vil sette inn en rad etter hver annen rad i utvalget' Denne koden er opprettet av Sumit Bansal fra trumpexcel.com Dim rng As Range Dim CountRow As Integer Dim i As Integer Set rng = Selection CountRow = rng .EntireRow.Count For i = 1 To CountRow / 2 ActiveCell.Offset (2, 0) .EntireRow.Insert ActiveCell.Offset (3, 0) .Velg Next i End Sub
Håper du synes denne opplæringen var nyttig.
