Tyhjän rivin lisääminen jokaisen Excel -rivin (tai jokaisen n. Rivin) jälkeen

Katso video - lisää tyhjä rivi Excelin jokaisen rivin jälkeen

Ihmiset, jotka työskentelevät suurten tietojoukkojen kanssa, tarvitsevat usein yksinkertaisia ​​asioita, kuten rivien tai sarakkeiden lisäämistä/poistamista.

Vaikka Excelissä on jo monia erilaisia ​​(ja yksinkertaisia) tapoja lisätä rivejä, tyhjän rivin lisäämisessä jokaisen toisen rivin (tai joka kolmannen tai neljännen rivin) jälkeen asiat muuttuvat hieman monimutkaisiksi.

Lisää tyhjä rivi jokaisen muun rivin jälkeen

Tässä opetusohjelmassa näytän sinulle todella yksinkertaisia ​​tapoja lisätä tyhjä rivi olemassa olevan tietojoukon jokaisen rivin (tai jokaisen n: nnen rivin) jälkeen.

Koska ei ole suoraa tapaa lisätä rivejä rivien väliin, tässä artikkelissa kuvatut menetelmät ovat kiertotapoja tämän toteuttamiseksi. Ja jos olet tyytyväinen VBA: han, voit tehdä tämän yhdellä napsautuksella.

Helper -sarakkeen ja lajittelutoiminnon käyttäminen

Oletetaan, että sinulla on alla esitetyn kaltainen tietojoukko ja haluat lisätä tyhjän kohdan olemassa olevien rivien väliin.

Alla on vaiheet tyhjien rivien lisäämiseksi olemassa olevien rivien väliin:

1. Lisää tyhjä sarake tietojoukon vasemmalle puolelle. Voit tehdä tämän napsauttamalla hiiren kakkospainikkeella vasemmanpuoleisimman sarakkeen sarakeotsikkoa ja napsauttamalla Lisää.
2. Kirjoita teksti "HelperColumn" kohtaan A1 (voit käyttää mitä tahansa haluamaasi tekstiä)
3. Kirjoita 1 soluun A2 ja 2 soluun A3.
4. Valitse molemmat solut ja aseta kohdistin valinnan oikeaan alakulmaan. Kun kohdistin muuttuu plus -kuvakkeeksi, kaksoisnapsauta sitä. Tämä täyttää koko sarakkeen kasvavilla numeroilla
5. Siirry auttajasarakkeen viimeiseen täytettyyn soluun ja valitse sitten sen alla oleva solu.
6. Kirjoita 1 tähän soluun ja 2 sen alla olevaan soluun
7. Valitse molemmat solut ja aseta kohdistin valinnan oikeaan alakulmaan.
8. Kun kohdistin muuttuu plus -kuvakkeeksi, napsauta ja vedä sitä alas. Tämä täyttää sarjan numeroita (aivan kuten saimme vaiheessa 3). Varmista, että saat enemmän numeroita kuin mitä sinulla on tietojoukossa. Jos esimerkiksi tietojoukossa on 10 tietuetta, varmista, että vähintään 10 solua on täytetty tässä vaiheessa. Kun olet valmis, tietojoukkasi näyttäisi alla olevan kuvan mukaiselta.
9. Valitse koko tietojoukko (mukaan lukien kaikki auttaja -sarakkeen solut).
10. Napsauta Data -välilehteä
11. Napsauta Lajittele -vaihtoehtoa
12. Käytä Lajittelu -valintaikkunassa seuraavia asetuksia:
    • Lajittele: auttaja
    • Lajittele: Solun arvo
    • Järjestys: pienimmästä suurimpaan
13. Napsauta OK. Tämä antaa sinulle aineiston alla kuvatulla tavalla.
14. Poista auttaja -sarake.

Huomaat, että heti kun napsautat OK Lajittele -valintaikkunassa, se järjestää rivit heti uudelleen ja nyt sinulla on tyhjä rivi tietojoukon jokaisen rivin jälkeen.

Todellisuudessa tämä ei oikeastaan ​​lisää tyhjää riviä. Tämä lajittelumenetelmä yksinkertaisesti järjestää tiedot uudelleen asettamalla tyhjät rivit tietojoukon alapuolelta tietojoukon rivien väliin.

Voit myös laajentaa samaa logiikkaa lisää tyhjä rivi kahden tai kolmen rivin välein.

Oletetaan, että sinulla on alla esitetyn kaltainen tietojoukko ja haluat saada tyhjän rivin kahden rivin välein.

Alla on vaiheet tämän tekemiseen:

1. Lisää tyhjä sarake tietojoukon vasemmalle puolelle. Voit tehdä tämän napsauttamalla hiiren kakkospainikkeella vasemmanpuoleisimman sarakkeen sarakeotsikkoa ja napsauttamalla Lisää.
2. Kirjoita teksti "HelperColumn" kohtaan A1 (voit käyttää mitä tahansa haluamaasi tekstiä)
3. Kirjoita 1 soluun A2 ja 2 soluun A3.
4. Valitse molemmat solut ja aseta kohdistin valinnan oikeaan alakulmaan. Kun kohdistin muuttuu plus -kuvakkeeksi, kaksoisnapsauta sitä. Tämä täyttää koko sarakkeen kasvavilla numeroilla
5. Siirry auttajasarakkeen viimeiseen täytettyyn soluun ja valitse sitten sen alla oleva solu.
6. Kirjoita 2 tähän soluun ja 4 sen alla olevaan soluun. Käytämme numeroita 2: n kerrannaisina, koska haluamme yhden tyhjän rivin joka kahden rivin jälkeen.
7. Valitse molemmat solut ja aseta kohdistin valinnan oikeaan alakulmaan.
8. Kun kohdistin muuttuu plus -kuvakkeeksi, napsauta ja vedä sitä alas. Tämä täyttää sarjan numeroita (aivan kuten saimme vaiheessa 3). Varmista, että saat numeron, joka on suurempi kuin mitä tietojoukossa on. Jos esimerkiksi tietojoukossa on 10 tietuetta, varmista, että saat vähintään numeron 10.
9. Valitse koko tietojoukko (mukaan lukien kaikki auttaja -sarakkeen solut).
10. Napsauta Data -välilehteä
11. Napsauta Lajittele -vaihtoehtoa
12. Käytä Lajittelu -valintaikkunassa seuraavia asetuksia:
    • Lajittele: auttaja
    • Lajittele: Solun arvo
    • Järjestys: pienimmästä suurimpaan
13. Napsauta OK. Tämä antaa sinulle lopullisen tietojoukon alla esitetyllä tavalla (tyhjä rivi jokaisen tietojoukon toisen rivin jälkeen)
14. Poista auttaja -sarake.

Samoin, jos haluat lisätä tyhjän rivin joka kolmannen rivin jälkeen, käytä numeroita 3, 6, 9 ja niin edelleen vaiheessa 5.

Yksinkertaisen VBA -koodin käyttö

Vaikka tarvitset paljon kiertotapoja vaihtoehtoisten tyhjien rivien lisäämiseksi Exceliin, VBA: n avulla kaikki on kakkua.

Yksinkertaisen VBA -koodin avulla sinun tarvitsee vain valita tietojoukko, johon haluat lisätä tyhjän rivin jokaisen rivin jälkeen, ja suorittaa koodi (vain yhdellä napsautuksella).

Alla on VBA -koodi, joka lisää tyhjän rivin tietojoukon jokaisen rivin jälkeen:

Sub InsertAlternateRows () 'Tämä koodi lisää rivin jokaisen valitun rivin jälkeen' Tämän koodin on luonut Sumit Bansal osoitteesta trumpexcel.com Dim rng As Range Dim CountRow kokonaislukuna Dim i Integer Set rng = Selection CountRow = rng. EntireRow.Count For i = 1 CountRow ActiveCell.Offset (1, 0) .EntireRow.Insert ActiveCell.Offset (2, 0) Valitse Next i End Sub

Yllä oleva koodi laskee valinnan rivien kokonaismäärän ja käyttää Seuraava -silmukkaa jokaisen rivin selaamiseen ja tyhjän rivin lisäämiseen jokaisen olemassa olevan rivin jälkeen.

Voit sijoittaa tämän VBA -koodin Excelin VB -editoriin seuraavasti:

1. Kopioi yllä oleva koodi
2. Siirry Kehittäjä -välilehteen ja napsauta Visual Basic -vaihtoehtoa. Tämä avaa VB -editorin. Voit myös käyttää pikanäppäintä ALT + F11
3. Napsauta VB Editorissa hiiren kakkospainikkeella mitä tahansa objektia Project Explorerissa
4. Vie hiiri Lisää -vaihtoehdon päälle ja napsauta sitten Moduuli. Tämä lisää uuden moduulin
5. Liitä yllä oleva koodi Moduulin koodi -ikkunaan.

Kun olet saanut koodin VB Editorissa, voit nyt käyttää tätä koodia tyhjien rivien lisäämiseen tietojoukon jokaisen muun rivin jälkeen.

Seuraavassa on ohjeet koodin käyttämiseen tyhjien rivien lisäämiseen jokaisen rivin jälkeen:

1. Valitse koko tietojoukko (paitsi otsikkorivi)
2. Napsauta Kehittäjä -välilehteä (jos sinulla ei ole Kehittäjä -välilehteä, saat ohjeet sen hankkimiseen napsauttamalla tätä)
3. Napsauta "Makrot" -vaihtoehtoa
4. Valitse Makro -valintaikkunassa makro - InsertAlternateRows
5. Napsauta Suorita

Se siitä!

Yllä olevat vaiheet lisäisivät vuorotellen tyhjiä rivejä tietojoukkoon.

Makron suorittamiseen Excelissä on monia erilaisia ​​tapoja. Jos sinun on esimerkiksi tehtävä tämä melko usein, voit lisätä tämän makron pikakäyttötyökaluriville, jotta voit suorittaa sen yhdellä napsautuksella.

Voit lukea lisää eri tavoista suorittaa makroja täältä.

Jos haluat lisätä tyhjän rivin joka toisen rivin jälkeen, voit käyttää alla olevaa koodia:

Sub InsertBlankRowAfterEvery2ndRow () 'Tämä koodi lisää rivin joka toisen valitun rivin jälkeen' Tämän koodin on luonut Sumit Bansal osoitteesta trumpexcel.com Dim rng Kuten alue Dim CountRow kokonaislukuna Dim i kokonaislukuna Set rng = Selection CountRow = rng .EntireRow.Count For i = 1 CountRow / 2 ActiveCell.Offset (2, 0) .EntireRow.Insert ActiveCell.Offset (3, 0) .Valitse Next i End Sub

Toivottavasti pidit tätä opetusohjelmaa hyödyllisenä.