Ako odstrániť každý druhý riadok z tabuľky programu Excel

Microsoft Excel je tabuľkový procesor populárny aplikácie , ktorá poskytuje užitočné nástroje pre zadávanie dát , výpočet , grafov , kontingenčných tabuliek a ďalšie . Aj keď Excel je komplexný , plne vybavený program , to nedáva užívateľom možnosť odstrániť striedajúce sa riadky tabuľky v predvolenom nastavení . Pridanie tejto funkcie vyžaduje , aby používatelia definovať automatickú úlohu s názvom makra , spustiť toto makro na riadky tabuľky , ktoré chcete zmeniť . Pokyny dovolená 1

Otvorte Excel Visual Basic Editor . S vašou tabuľky otvorené v programe Excel , kliknite na položku " Nástroje " z menu v hornej časti obrazovky a vyberte možnosť " makro " a " Editor jazyka Visual Basic . " Ak používate program Excel 2003 alebo starší, prejdite na ďalší krok .

Excel 2007 užívateľov Všimnite si , že predchádzajúce príkaz neexistuje v aktuálnej verzii programu Excel , a že žiadne makro nástroje pre úpravy sa zobrazia v predvolenom nastavení . Zapnutie prístupu k týmto nástrojom kliknutím na tlačidlo Office v ľavom hornom rohu obrazovky a potom kliknutím na tlačidlo " Možnosti programu Excel " v dolnej časti ponuky . Vyhľadajte záhlaví označené " Najlepšie možnosti pre prácu s aplikáciou Excel " v zobrazenom dialógovom okne , potom začiarknite políčko " Zobraziť kartu Vývojár na páse kariet " štítku . Kliknite na tlačidlo " OK " . Vyberte kartu Vývojár a potom kliknite na tlačidlo " Visual Basic " .
2

Pridať kód makra . Kliknite na " Vložiť " z menu v hornej časti Visual Basic okna editora Microsoft a zvoľte " modul " . Skopírujte všetok kód nižšie uvedených , potom ho vložiť do tohto modulu :

Sub Delete_Every_Other_Row ( ) ' Dimension variables.Y = False ' Zmeňte to na hodnotu True , ak chcete " vymazať riadky 1 , 3 , 5 , a tak on.I = 1Nastavte xRng = Voľba " Loop raz pre každý riadok v selection.For xCounter = 1 Ak chcete xRng.Rows.Count "Ak je Y hodnotu True , potom ... Ak Y = True Then ' ... zmazať celý riadok cells.xRng.Cells ( I) . EntireRow.Delete " Inak ... Else " . .. zvyšovať Aj po druhom , takže sa môžeme prechádzať range.I = I + 1End ak " ak Y je pravda , že aby bolo False , ak Y je False , aby to True.Y = Nie YNext xCounterEnd Sub
sims 3

Spustiť makro . Vráťte sa do tabuľky bez zatvorenia editore jazyka Visual Basic . Zvýraznite riadky , pre ktoré by mal byť striedavý riadok odstrániť . V programe Excel 2003 a staršie , kliknite na " Nástroje " položku menu , potom vyberte " makro " , po ktorom nasleduje voľba " makrá " . V programe Excel 2007 kliknite na kartu Vývojár , kliknite na tlačidlo " makrá " . Ak chcete spustiť makro v jednej verzii , vyberte makro označené " Delete_Every_Other_Row " , potom kliknite na " Spustiť " . Každého párneho riadku tabuľky zmaže .

• Predchádzajúca strana: Ako vytvoriť skladaný stĺpcový graf v programe Excel 
• Ďalšia strana: Ako odobrať vzorec alebo program v tabuľke programu Excel