Ako odstrániť každý ďalší riadok v programe Excel (alebo každý N -tý riadok)

Sledujte video - vymažte všetky ostatné riadky v programe Excel

Niekedy môže byť potrebné odstrániť každý ďalší riadok (tj. Alternatívne riadky) alebo každý tretí/štvrtý/piaty riadok v programe Excel.

Jeden prípad použitia by mohol byť vtedy, keď máte týždenné údaje a chcete údaje iba za párne alebo nepárne týždne. Iný prípad môže nastať vtedy, keď získate výpis údajov z databázy a všetky užitočné údaje sú len v každom druhom alebo treťom riadku.

Aj keď máte vždy možnosť manuálne vyberať a odstraňovať riadky, je to neúčinné v prípade, že máte veľkú množinu údajov.

Existujú lepšie spôsoby, ako to urobiť.

V tomto tutoriále vám ukážem niekoľko spôsobov, ako odstrániť každý druhý riadok v programe Excel pomocou jednoduchej techniky filtrovania. A ak sa vám páči používanie kódu makra VBA, uviedol som aj krátky kód VBA, ktorý to zvládne jediným kliknutím. Metódy sú uvedené v tejto príručke pre všetky verzie programu Excel (2007, 2010, 2013 a 2016)

Aj keď odstránenie každého ďalšieho riadka v programe Excel môže byť celkom jednoduché, odstránenie každého ďalšieho stĺpca môže byť výzva. Dôvodom je, že v programe Excel nemôžete filtrovať stĺpce (spôsob, akým môžete filtrovať riadky). V poslednej časti tohto tutoriálu vám tiež ukážem niekoľko spôsobov, ako odstrániť alternatívne stĺpce (alebo každý N -tý stĺpec) v programe Excel.

Odstráňte každý ďalší riadok filtrovaním množiny údajov (pomocou vzorca)

Ak by ste nejakým spôsobom mohli filtrovať všetky párne riadky alebo nepárne riadky, bolo by veľmi ľahké tieto riadky/záznamy odstrániť.

Aj keď na to nie je vstavaná funkcia, môžete použiť pomocný stĺpec na prvé rozdelenie riadkov na nepárne a párne a potom filtrovať podľa hodnoty stĺpca pomocníka.

Predpokladajme, že máte množinu údajov, ako je uvedené nižšie, ktorá obsahuje údaje o predajoch pre každého obchodného zástupcu pre dve oblasti (USA a Kanada) a chcete údaje pre Kanadu odstrániť.

Nasledujú kroky, ktoré musíte najskôr filtrovať a potom odstrániť každý ďalší riadok (ktorý obsahuje údaje pre Kanadu):

1. Do bunky vedľa záhlavia posledného stĺpca zadajte text PomocníkStĺpec (alebo akýkoľvek text hlavičky, ktorý má mať pomocný stĺpec)
2. Do bunky pod hlavičkou stĺpca pomocníka zadajte nasledujúci vzorec: = ISEVEN (ROW ()). Skopírujte tento vzorec pre všetky bunky. Tento vzorec vráti hodnotu TRUE pre všetky párne riadky a FALSE pre všetky riadky ODD
3. Vyberte celý súbor údajov (vrátane buniek, do ktorých sme vo vyššie uvedenom kroku zadali vzorec).
4. Kliknite na kartu Údaje
5. Kliknite na ikonu Filter. To použije filter na všetky hlavičky v množine údajov
6. Kliknite na ikonu Filter v bunke HelperColumn.
7. Zrušte výber možnosti PRAVDA (je teda vybratá iba možnosť NEPRAVDA)
8. Kliknite na tlačidlo OK. Týmto sa údaje vyfiltrujú a zobrazia sa iba tie záznamy, ktorých hodnota HelperColumn je FALSE.
9. Vyberte všetky filtrované bunky v pomocnom stĺpci (okrem hlavičky)
10. Kliknite pravým tlačidlom myši na ktorúkoľvek z vybratých buniek a kliknite na položku „Odstrániť riadok“
11. V dialógovom okne, ktoré sa otvorí, kliknite na tlačidlo OK. Tým sa odstránia všetky viditeľné záznamy a odteraz sa vám bude zobrazovať iba riadok hlavičky.
12. Kliknite na kartu Údaje a potom kliknite na ikonu Filter. Týmto odstránite filter a budete môcť vidieť všetky zostávajúce záznamy.

Vyššie uvedené kroky filtrujú každý druhý riadok v množine údajov a potom tieto riadky odstránia.

V tejto fáze si nerobte starosti s hodnotami pomocného stĺpca. Výsledné údaje obsahujú iba riadky pre USA a všetky riadky pre Kanadu sa odstránia. Teraz môžete pomocný stĺpec odstrániť.

V prípade, že chcete vymazať všetky ostatné riadky počnúc prvým riadkom, v kroku 7 vyberte možnosť PRAVDA a zrušte výber položky NEPRAVDA.

Poznámka: Keď odstránite riadky v programe Excel pomocou vyššie uvedenej metódy, odstránia sa tým aj všetky údaje, ktoré môžete mať v celom rozsahu (okrem údajov v množine údajov). Keď použijete túto metódu, uistite sa, že vľavo a vpravo od množiny údajov, ktorú odstraňujete, nič nie je.

Aj keď je táto metóda skvelá, má dve nevýhody:

1. Musíte pridať nový stĺpec ( PomocníkStĺpec v našom prípade vyššie)
2. Ak to musíte často odstraňovať, môže to byť časovo náročné

Súvisiaci návod: Odstráňte riadky na základe hodnoty bunky (alebo podmienky) v programe Excel

Odstráňte každý N -tý riadok filtrovaním množiny údajov (pomocou vzorca)

Vo vyššie uvedenej metóde som vám ukázal, ako odstrániť každý ďalší riadok (alternatívny riadok) v programe Excel.

A rovnakú logiku môžete použiť aj na vymazanie každého tretieho alebo štvrtého riadka v programe Excel.

Predpokladajme, že máte množinu údajov, ako je uvedené nižšie, a chcete odstrániť všetky tri riadky.

Kroky na odstránenie každého tretieho riadka sú takmer rovnaké ako kroky uvedené vo vyššie uvedenej časti (na odstránenie alternatívnych riadkov). Jediný rozdiel je vo vzorci použitom v kroku 2.

Nasledujú kroky, ako to urobiť:

1. Do bunky, ktorá je vedľa záhlavia posledného stĺpca, zadajte text PomocníkStĺpec (alebo ľubovoľný text hlavičky, ktorý má mať pomocný stĺpec)
2. Do bunky pod hlavičkou stĺpca pomocníka zadajte nasledujúci vzorec: = MOD (RIADOK (), 3) = 1. Tento vzorec vráti hodnotu TRUE pre každý tretí riadok a FALSE pre každý ďalší riadok.
3. Vyberte celý súbor údajov (vrátane buniek, do ktorých sme vo vyššie uvedenom kroku zadali vzorec).
4. Kliknite na kartu Údaje
5. Kliknite na ikonu Filter. To použije filter na všetky hlavičky v množine údajov
6. Kliknite na ikonu Filter v bunke HelperColumn.
7. Zrušte výber možnosti PRAVDA (je teda vybratá iba možnosť NEPRAVDA)
8. Kliknite na tlačidlo OK. Týmto sa údaje vyfiltrujú a zobrazia sa iba tie záznamy, ktorých hodnota HelperColumn je FALSE.
9. Vyberte všetky bunky v pomocnom stĺpci
10. Kliknite pravým tlačidlom myši na ktorúkoľvek z vybratých buniek a kliknite na položku Odstrániť riadok
11. V dialógovom okne, ktoré sa otvorí, kliknite na tlačidlo OK. Tým sa odstránia všetky viditeľné záznamy a odteraz sa vám bude zobrazovať iba riadok hlavičky.
12. Kliknite na kartu Údaje a potom kliknite na ikonu Filter. Týmto odstránite filter a budete môcť vidieť všetky zostávajúce záznamy.

Vyššie uvedené kroky by vymazali každý tretí riadok z množiny údajov a získali by ste výsledné údaje, ako je uvedené nižšie.

V tejto fáze si nerobte starosti s hodnotami pomocného stĺpca. Teraz môžete pomocný stĺpec odstrániť.

Vzorec použitý v kroku 2 používa funkciu MOD - ktorá dáva zvyšok, keď je jedno číslo delené druhým. Tu som použil funkciu ROW na získanie čísla riadku a delí ho 3 (pretože chceme vymazať každý tretí riadok).

Pretože náš súbor údajov začína od druhého riadka (tj riadok č. 2 obsahuje prvý záznam), používam nasledujúci vzorec:= MOD (RIADOK (), 3) = 1

Priraďujem to k 1 a pre každý tretí riadok bude vzorec MOD dávať zvyšok ako 1.

Podľa toho môžete upraviť vzorec. Ak by napríklad prvý záznam vašej množiny údajov začínal od tretieho riadka, vzorec by bol = MOD (RIADOK (), 3) = 2

Automaticky odstrániť každý ďalší riadok (alebo N -tý riadok) pomocou makra VBA (rýchla metóda)

Ak musíte pomerne často odstraňovať všetky ostatné riadky (alebo každý n -tý riadok), môžete použiť kód VBA a mať ho k dispozícii na paneli s nástrojmi Rýchly prístup. To vám umožní rýchlo odstrániť alternatívne riadky jediným kliknutím.

Nasleduje kód, ktorý vás najskôr požiada, aby ste vybrali rozsah, v ktorom chcete odstrániť alternatívne riadky, a potom odstráňte každý druhý riadok vo vybranej množine údajov.

Sub Delete_Every_Other_Row () Dim Rng As Range Set Rng = Application.InputBox ("Select the Range (Excending headers)", "Range Selection", Type: = 8) For i = Rng.Rows.Count to 1 Step -2 If i Mod 2 = 0, potom Rng.Rows (i). Odstrániť koniec, ak je nasledujúci i End Sub

Keď spustíte vyššie uvedený kód, najskôr vás požiada o výber rozsahu buniek. Keď urobíte výber, prejde každým riadkom a odstráni každý druhý riadok.

Ak chcete namiesto toho odstrániť každý tretí riadok, môžete použiť nasledujúci kód:

Sub Delete_Every_Third_Row () Dim Rng As Range Set Rng = Application.InputBox ("Select the Range (Excending headers)", "Range Selection", Type: = 8) For i = Rng.Rows.Count to 1 Step -3 If i Mod 3 = 0, potom Rng.Rows (i). Odstrániť koniec, ak je nasledujúci i End Sub

Kam vložiť tento kód makra VBA?

Tento kód musíte vložiť do bežného modulu v editore VB v programe Excel.

Nasledujú kroky na otvorenie editora Vb, pridanie modulu a umiestnenie kódu do neho:

1. Skopírujte vyššie uvedený kód VBA.
2. Prejdite na kartu Vývojár.
3. Kliknite na položku Visual Basic.
4. V editore VB kliknite pravým tlačidlom myši na ľubovoľný objekt zošita.
5. Prejdite na položku Vložiť a kliknite na modul.
6. Do modulu prilepte vyššie uvedený kód VBA.
7. Zatvorte editor VB.

Akonáhle budete mať kód v editore VB, môžete na spustenie kódu použiť nasledujúce metódy:

• Spustite makro z editora VB (kliknutím na zelené tlačidlo prehrávania na paneli s nástrojmi VB Editor)
• Umiestnením kurzora na ľubovoľný riadok v kóde a stlačením klávesu F5
• Priradením makra k tlačidlu/tvaru
• Pridaním makra na panel s nástrojmi Rýchly prístup

Tu je podrobný návod, ako spustiť makro v programe Excel.

Ak to musíte často robiť, môžete zvážiť pridanie kódu VBA do osobného zošita makier. Takto budete mať vždy k dispozícii na použitie vo všetkých pracovných zošitoch.

Keď máte kód VBA v zošite, musíte ho uložiť ako súbor s povoleným makrom (s príponou .XLSM)

Poznámka: Pretože všetky zmeny vykonané kódom VBA sú nevratné, je najlepšie najskôr vytvoriť záložnú kópiu zošita/pracovného hárka a potom spustiť tento kód.

Odstrániť každý ďalší stĺpec (alebo každý deviaty stĺpec)

Odstránenie každého alternatívneho riadku alebo každého tretieho/štvrtého riadka je jednoduché, pretože môžete použiť možnosť filtra. Stačí použiť vzorec, ktorý identifikuje alternatívne riadky (alebo každý tretí/štvrtý riadok) a tieto riadky filtruje.

Táto rovnaká metodika bohužiaľ nebude fungovať so stĺpcami - pretože nemôžete filtrovať stĺpce spôsobom, akým filtrujete riadky.

Ak teda musíte odstrániť každý druhý stĺpec (alebo každý tretí/štvrtý/N -tý stĺpec), musíte byť trochu kreatívnejší.

V tejto časti vám ukážem dve metódy, ktoré môžete použiť na odstránenie všetkých ostatných stĺpcov v programe Excel (a rovnakou metódou môžete odstrániť aj každý tretí/štvrtý/N -tý stĺpec, ak chcete).

Odstráňte alternatívne stĺpce pomocou vzorcov a metódy zoradenia

Predpokladajme, že máte množinu údajov, ako je uvedené nižšie, a chcete odstrániť všetky ostatné stĺpce (okrem stĺpca hlavičky A)

Ide o to, identifikovať alternatívne stĺpce pomocou vzorca a potom stĺpce zoradiť podľa tohto vzorca. Keď budete mať zoradené stĺpce pohromade, môžete ich manuálne vybrať a odstrániť.

Nasledujú kroky na odstránenie všetkých ostatných stĺpcov v programe Excel:

1. Vložte riadok nad riadok hlavičky (kliknite pravým tlačidlom myši na ľubovoľnú bunku v hlavičke, kliknite na položku Vložiť a potom kliknite na možnosť Celý riadok)
2. Do bunky nad stĺpcom úplne vľavo v množine údajov zadajte nasledujúci vzorec a skopírujte pre všetky bunky: = MOD (STĹPEC (), 2)
3. Preveďte hodnoty vzorca na čísla. Ak to chcete urobiť, skopírujte bunky, kliknite pravým tlačidlom myši a prejdite na položku Prilepiť špeciálne -> Prilepiť hodnoty.
4. Vyberte celý súbor údajov (okrem hlavičiek v stĺpci). V tomto prípade som vybral B1: G14 (a NIE stĺpec A)
5. Kliknite na kartu Údaje
6. Kliknite na ikonu Zoradiť
7. V dialógovom okne Zoradiť vykonajte nasledujúce zmeny:
   • Kliknite na tlačidlo „Možnosti“ a v dialógovom okne, ktoré sa otvorí, kliknite na „Zoradiť zľava doprava“ a potom kliknite na tlačidlo OK
   • V rozbaľovacom zozname Zoradiť podľa vyberte riadok 1. Toto je riadok s výsledkami vzorca
   • V rozbaľovacom zozname Poradie vyberte možnosť Od najmenšieho po najväčší.
8. Kliknite na tlačidlo OK

Vyššie uvedené kroky zoradia všetky stĺpce a spoja všetky alternatívne stĺpce na jednom mieste (na konci).

Teraz môžete vybrať všetky tieto stĺpce (pre ktoré je hodnota vzorca 1) a odstrániť ich.

Aj keď to nie je najlepšie riešenie, prácu si napriek tomu odvedie.

V prípade, že chcete odstrániť každý tretí alebo každý štvrtý stĺpec, musíte zodpovedajúcim spôsobom upraviť vzorec.

Súvisiaci návod: Triedenie v programe Excel (podľa riadkov, stĺpcov, farieb, dátumov a čísel)

Odstráňte alternatívne stĺpce pomocou VBA

Ďalším rýchlym spôsobom, ako odstrániť alternatívne stĺpce, je použiť nasledujúci kód VBA:

Sub Delete_Every_Other_Column () Dim Rng As Range Set Rng = Application.InputBox ("Select the Range (Excending headers)", "Range Selection", Type: = 8) For i = Rng.Columns.Count to 1 Step -2 If i Mod 2 = 0 Potom Rng.Columns (i). Vymazať koniec, ak je nasledujúci i Koniec Sub

Vyššie uvedený kód vás požiada, aby ste vybrali rozsah buniek, ktoré majú stĺpce. Tu musíte vybrať stĺpce okrem stĺpcov, ktoré majú hlavičku.

Keď zadáte rozsah buniek s údajmi, bude používať slučku For Loop a odstráni všetky ostatné stĺpce.

V prípade, že chcete odstrániť každý tretí stĺpec, môžete použiť kód uvedený nižšie (a zodpovedajúcim spôsobom upraviť tak, aby sa odstránil aj deviaty stĺpec)

Sub Delete_Every_Third_Column () Dim Rng As Range Set Rng = Application.InputBox ("Select the Range (Excending headers)", "Range Selection", Type: = 8) For i = Rng.Columns.Count to 1 Step -3 If i Mod 3 = 0, potom Rng.Columns (i). Odstrániť koniec, ak je nasledujúci i Koniec Sub

Kroky, kam umiestniť tento kód VBA a ako ho použiť, sú popísané vo vyššie uvedenej časti s názvom - "Automaticky odstrániť každý ďalší riadok (alebo N -tý riadok) pomocou makra VBA (rýchla metóda)"

Dúfam, že ste našli tento návod na Excel užitočný.