Ako odstrániť každý druhý riadok alebo každý N-ty riadok v programe Excel

  • Zdieľajte To
Michael Brown

Tento krátky návod vysvetľuje, ako odstrániť každý druhý riadok v programe Excel pomocou filtrovania alebo kódu VBA. Dozviete sa tiež, ako odstrániť každý 3., 4. alebo akýkoľvek iný N-ty riadok.

Existuje mnoho situácií, keď môžete potrebovať odstrániť alternatívne riadky v pracovných listoch programu Excel. Napríklad môžete chcieť ponechať údaje pre párne týždne (riadky 2, 4, 6, 8 atď.) a presunúť všetky nepárne týždne (riadky 3, 5, 7 atď.) do iného listu.

Odstránenie každého ďalšieho riadku v programe Excel sa vo všeobecnosti obmedzuje na výber alternatívnych riadkov. Po výbere riadkov sa jedným ťahom na Odstrániť Stačí tlačidlo . Ďalej sa v tomto článku naučíte niekoľko techník na rýchle vybratie a odstránenie každého druhého alebo každého N-tého riadku v programe Excel.

    Ako odstrániť každý druhý riadok v programe Excel pomocou filtrovania

    Bežný spôsob vymazania každého druhého riadku v programe Excel je v podstate takýto: najprv vyfiltrujete striedavé riadky, potom ich vyberiete a vymažete všetky naraz. Podrobný postup nasleduje nižšie:

    1. Do prázdneho stĺpca vedľa pôvodných údajov zadajte postupnosť núl a jednotiek. Môžete to rýchlo urobiť tak, že do prvej bunky napíšete 0 a do druhej 1, potom skopírujete prvé dve bunky a vložíte ich do stĺpca až po poslednú bunku s údajmi.

      Prípadne môžete použiť tento vzorec:

      =MOD(ROW(),2)

      Logika vzorca je veľmi jednoduchá: funkcia ROW vráti aktuálne číslo riadku, funkcia MOD ho vydelí dvoma a vráti zvyšok zaokrúhlený na celé číslo.

      Výsledkom je, že vo všetkých párnych riadkoch je 0 (pretože sú delené 2 rovnomerne bez zvyšku) a vo všetkých nepárnych riadkoch je 1:

    2. Podľa toho, či chcete odstrániť párne alebo nepárne riadky, odfiltrujte jednotky alebo nuly.

      Ak to chcete urobiť, vyberte ľubovoľnú bunku v stĺpci Pomocník, prejdite na Údaje karta> Triedenie a filtrovanie a kliknite na Filter Tlačidlo Rozbaľovacie šípky filtra sa zobrazia vo všetkých bunkách záhlavia. Kliknete na tlačidlo šípky v stĺpci Pomocník a začiarknete jedno z políčok:

      • 0 na vymazanie párnych riadkov
      • 1 na odstránenie nepárnych riadkov

      V tomto príklade odstránime riadky s hodnotami "0", takže ich vyfiltrujeme:

    3. Teraz, keď sú všetky riadky "1" skryté, vyberte všetky viditeľné riadky "0", kliknite pravým tlačidlom myši na výber a kliknite na položku Odstrániť riadok :

    4. Po predchádzajúcom kroku ste získali prázdnu tabuľku, ale nebojte sa, riadky "1" v nej stále sú. Ak ich chcete opäť zviditeľniť, jednoducho odstráňte automatický filter kliknutím na tlačidlo Filter znovu tlačidlo:

    5. Vzorec v stĺpci C sa prepočíta pre zostávajúce riadky, ale už ho nepotrebujete. Teraz môžete bezpečne odstrániť pomocný stĺpec:

    Výsledkom je, že v našom pracovnom liste zostali len párne týždne, nepárne týždne sú preč!

    Tip: Ak chcete každý ďalší riadok presunúť na iné miesto, a nie ho úplne odstrániť, najprv skopírujte filtrované riadky, vložte ich na nové miesto a potom filtrované riadky odstráňte.

    Ako odstrániť alternatívne riadky v programe Excel pomocou VBA

    Ak nechcete strácať čas triviálnou úlohou, akou je vymazanie každého druhého riadku v hárkoch programu Excel, nasledujúce makro VBA môže tento proces automatizovať za vás:

    Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count>= 2 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1Krok -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End Sub

    Ako odstrániť každý druhý riadok v programe Excel pomocou makra

    Vložte makro do pracovného hárka obvyklým spôsobom prostredníctvom editora jazyka Visual Basic:

    1. Stlačením klávesovej skratky Alt + F11 otvorte okno Visual Basic for Applications.
    2. Na hornom paneli ponuky kliknite na položku Vložte > Modul a vložte vyššie uvedené makro do Modul
    3. Stlačením tlačidla F5 spustíte makro.
    4. Zobrazí sa dialógové okno a vyzve vás na výber rozsahu. Vyberte svoju tabuľku a kliknite na tlačidlo OK:

    Hotovo! Každý ďalší riadok vo vybranom rozsahu sa odstráni:

    Ako odstrániť každý N-ty riadok v programe Excel

    Pri tejto úlohe rozšírime techniku filtrovania, ktorú sme použili na odstránenie každého druhého riadku. Rozdiel je vo vzorci, na ktorom je filtrovanie založené:

    MOD(ROW()- m , n )

    Kde:

    • m je číslo riadku prvej bunky s údajmi mínus 1
    • n je N-ty riadok, ktorý chcete vymazať

    Povedzme, že vaše údaje začínajú v riadku 2 a vy chcete vymazať každý tretí riadok. Takže vo vašom vzorci n sa rovná 3 a m sa rovná 1 (riadok 2 mínus 1):

    =MOD(RIADOK() - 1, 3)

    Ak naše údaje začínajú v riadku 3, potom m by sa rovnala 2 (riadok 3 mínus 1) a tak ďalej. Táto oprava je potrebná na postupné číslovanie riadkov počnúc číslom 1.

    Vzorec vydelí relatívne riadkové číslo číslom 3 a vráti zvyšok po delení. V našom prípade dáva pre každý tretí riadok nulu, pretože každé tretie číslo sa delí číslom 3 bez zvyšku (3,6,9 atď.):

    A teraz vykonáte už známe kroky na filtrovanie riadkov "0":

    1. Vyberte ľubovoľnú bunku v tabuľke a kliknite na tlačidlo Filter tlačidlo na Údaje
    2. Filtrovanie stĺpca Pomocník tak, aby sa zobrazovali len hodnoty "0".
    3. Vyberte všetky viditeľné riadky "0", kliknite pravým tlačidlom myši a vyberte Odstrániť riadok z kontextového menu.
    4. Odstráňte filter a odstráňte stĺpec Pomocník.

    Podobným spôsobom môžete v programe Excel vymazať každý 4., 5. alebo akýkoľvek iný N-ty riadok.

    Tip. Ak potrebujete odstrániť riadky s irelevantnými údajmi, bude vám nápomocný nasledujúci návod: Ako odstrániť riadky na základe hodnoty bunky.

    Ďakujem vám za prečítanie a dúfam, že sa na našom blogu uvidíme opäť budúci týždeň.

    Michael Brown je nadšený technologický nadšenec s vášňou pre zjednodušovanie zložitých procesov pomocou softvérových nástrojov. S viac ako desaťročnými skúsenosťami v technologickom priemysle si zdokonalil svoje zručnosti v programoch Microsoft Excel a Outlook, ako aj Tabuľky Google a Dokumenty. Michaelov blog je venovaný zdieľaniu svojich vedomostí a odborných znalostí s ostatnými a poskytuje jednoduché tipy a návody na zlepšenie produktivity a efektivity. Či už ste skúsený profesionál alebo začiatočník, Michaelov blog ponúka cenné poznatky a praktické rady, ako z týchto základných softvérových nástrojov vyťažiť maximum.