Jak rychle odstranit každý druhý řádek v aplikaci Excel?
Pokud chcete rychle smazat všechny ostatní řádky nebo sloupce v aplikaci Excel, hlavním bodem je, jak můžete nejprve rychle vybrat každý druhý řádek nebo sloupec a poté na ně použít operaci odstranění. A tento článek vám ukáže některé složité věci o tom, jak nejprve vybrat každý druhý řádek nebo sloupec a poté je rychle odstranit.
Odstraňte každý další řádek v aplikaci Excel pomocí příkazu Filtr
Odstraňte každý druhý řádek v aplikaci Excel pomocí kódu VBA
Odstraňte všechny ostatní řádky nebo sloupce v aplikaci Excel pomocí programu Kutools pro Excel
Odstraňte každý další řádek v aplikaci Excel pomocí příkazu Filtr
Microsoft Excel Filtr příkaz vám pomůže rychle filtrovat každý druhý řádek a poté je mazat najednou, postupujte takto:
1. Do prázdného sloupce kromě původních dat zadejte 0,1,0,1…, 0,1. V tomto případě zadáme čísla do pomocného sloupce C. Viz následující snímek obrazovky:
2. Vyberte sloupec C a klikněte na Filtr pod tlačítkem Data záložka. Poté klikněte na tlačítko se šipkou vedle C1 a zaškrtněte pouze 0 pod Vybrat vše volba. Viz screenshot:
3. Pak jsou všechny řádky s 1 skryty. Vyberte viditelné řádky s 0 a klikněte na Domů > Vymazat > Odstranit řádky listu tyto řádky smazat. Poté odstraní všechny další řádky a musíte kliknout Filtr znovu zobrazíte pouze řádky s 1. Viz screenshoty:
4. Nakonec můžete pomocný sloupec C podle potřeby odstranit.
Vyberte každý druhý nebo n-tý řádek, sloupec a poté je najednou odstraňte
Kutools pro Excel's Vyberte Intervalové řádky a sloupce obslužný program vám pomůže najít a vybrat všechny ostatní nebo n-tý řádky nebo sloupce a poté můžete provádět některé operace podle potřeby. Klikněte a stáhněte si Kutools pro Excel!
Odstraňte každý druhý řádek v aplikaci Excel pomocí kódu VBA
Makro VBA je ve skutečnosti také dobrou volbou k vyřešení tohoto problému.
1. Podržte stisknuté tlačítko Další + F11 klíče v aplikaci Excel a otevře Microsoft Visual Basic pro aplikace okno.
2. Klepněte na Vložit > Modula vložte následující makro do souboru Modul Okno.
Kód VBA: Smažte všechny další řádky ve výběru:
Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
Set rng = InputRng.Cells(i, 1)
rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Stiskněte F5 klíč ke spuštění tohoto makra. Poté se zobrazí dialogové okno pro výběr rozsahu. Viz screenshot:
4. Poté klikněte OK, každý druhý řádek ve vybraném rozsahu z druhého řádku je odstraněn najednou, viz screenshot:
Odstraňte všechny ostatní řádky nebo sloupce v aplikaci Excel pomocí programu Kutools pro Excel
Pro začínajícího uživatele Microsoft Excel je použití makra VBA trochu komplikované. The Vyberte Intervalové řádky a sloupce užitečnost Kutools pro Excel vám pomůže rychle smazat všechny ostatní řádky.
Kutools pro Excel : s více než 300 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů. |
Po instalaci Kutools pro Excel, postupujte následovně:
1. Vyberte rozsah, který chcete odstranit, všechny ostatní řádky a poté použijte tento nástroj kliknutím na Kutools > vybrat > Vyberte intervalové řádky a sloupce….
2. v Vyberte Intervalové řádky a sloupce v dialogovém okně zadejte nastavení podle následujícího obrázku obrazovky a klikněte na OK tlačítko pro výběr nejprve všech ostatních řádků.
3. Poté je vybrán a zvýrazněn každý další řádek ve výběru. Viz screenshot:
4. Poté můžete rychle odstranit vybrané všechny další řádky kliknutím na Domů > Vymazat > Odstranit řádky listu odstranit všechny tyto řádky. Zobrazit snímky obrazovky:
Kliknutím se dozvíte více o této funkci Vybrat intervalové řádky a sloupce.
Díky této funkci můžete také podle potřeby odstranit každý n-tý řádek nebo sloupec.
Stáhněte si zdarma zkušební verzi Kutools pro Excel!
Ukázka: Odstraňte všechny další řádky nebo sloupce pomocí programu Kutools pro Excel
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!