Jak filtrovat seznam a odstranit zbývající skryté nebo viditelné řádky v aplikaci Excel?
U filtrovaného seznamu možná budete muset odstranit skryté nebo viditelné řádky, aby se zachovala pouze užitečná data. V tomto článku vám ukážeme způsoby odstranění zbývajících skrytých nebo viditelných řádků filtrovaného seznamu v aplikaci Excel.
Odstraňte skryté řádky v aktivním listu pomocí kódu VBA
Odstraňte viditelné řádky filtrovaného seznamu výběrem všech viditelných buněk
Snadno odstraňte skryté nebo viditelné řádky filtrovaného seznamu pomocí programu Kutools pro Excel
Odstraňte skryté řádky v aktivním listu pomocí kódu VBA
Tato část vám ukáže kód VBA k odstranění skrytých řádků na aktivním listu. Postupujte prosím následovně.
1. Aktivujte list, který potřebujete k odstranění skrytých řádků, stiskněte Další + F11 současně otevřete Microsoft Visual Basic pro aplikace okno.
2. V okně Microsoft Visual Basic pro aplikace klepněte na Vložit > Modul. A pak zkopírujte a vložte níže uvedený kód VBA do okna modulu.
Kód VBA: Odstraňte skryté řádky
Sub RemoveHiddenRows()
Dim xRow As Range
Dim xRg As Range
Dim xRows As Range
On Error Resume Next
Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
If xRows Is Nothing Then Exit Sub
For Each xRow In xRows.Columns(1).Cells
If xRow.EntireRow.Hidden Then
If xRg Is Nothing Then
Set xRg = xRow
Else
Set xRg = Union(xRg, xRow)
End If
End If
Next
If Not xRg Is Nothing Then
MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
xRg.EntireRow.Delete
Else
MsgBox "No hidden rows found", , "Kutools for Excel"
End If
End Sub
3. zmáčkni F5 klíč ke spuštění kódu. Pokud jsou na aktivním listu skryté řádky, po spuštění kódu se zobrazí dialogové okno s informacemi o tom, kolik skrytých řádků bylo odstraněno. Klikněte na ikonu OK tlačítko pro odstranění skrytých řádků. Viz screenshot:
V opačném případě se po spuštění kódu zobrazí následující dialogové okno.
Poznámka: výše uvedený kód VBA může nejen odstranit skryté řádky filtrovaného seznamu, ale také odstranit skryté řádky, které jste dříve ručně skryli.
Odstraňte viditelné řádky filtrovaného seznamu výběrem funkce všech viditelných buněk
Chcete-li odstranit viditelné řádky filtrovaného seznamu, postupujte takto.
1. Vyberte všechny odfiltrované řádky a stiskněte F5 klávesa pro otevření Přejít na V dialogovém okně klepněte na ikonu Speciální knoflík. Viz screenshot:
2. V Přejít na speciální V dialogovém okně zaškrtněte Pouze viditelné buňky možnost a poté klikněte na OK .
3. Nyní jsou vybrány všechny viditelné řádky, klikněte pravým tlačítkem na výběr a poté klikněte na Odstranit řádky.
Až do teď jsou všechny viditelné řádky odstraněny z filtrovaného seznamu.
Snadno odstraňte skryté nebo viditelné řádky filtrovaného seznamu pomocí programu Kutools pro Excel
Výše uvedené dvě metody nemusí být řešením přání pro mnoho uživatelů aplikace Excel, zde vám představujeme užitečný nástroj. S Odstranit skryté (viditelné) řádky a sloupce užitečnost Kutools pro Excel, můžete snadno odstranit skryté řádky ve vybraném rozsahu / listech, aktivním listu nebo všech listech v aplikaci Excel.
Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.
1. Pokud chcete odstranit pouze skryté nebo viditelné řádky filtrovaného seznamu, vyberte ručně filtrovaný rozsah a klikněte na Kutools > Vymazat > Odstranit skryté (viditelné) řádky a sloupce. Viz snímek obrazovky:
2. V Odstranit skryté (viditelné) řádky a sloupce dialogové okno ponechejte Ve zvoleném rozsahu vybrané v Podívejte se do rozevírací seznam (můžete vybrat další možnosti podle potřeby), zkontrolujte Řádky možnost v Smazat typ sekci a v Podrobný typ část, zkontrolujte Viditelné řádky or Skryté řádky možnost, jak potřebujete. A nakonec klikněte na OK .
3. Poté se zobrazí dialogové okno s informacemi o tom, kolik řádků bylo smazáno. Klikněte prosím na OK .
Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.
Odstraňte skryté nebo viditelné řádky filtrovaného seznamu 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!