Přejít k hlavnímu obsahu
 

Jak vybrat neprázdné buňky v rozsahu v aplikaci Excel?

Autor: Kelly Naposledy změněno: 2020-09-10

Řekněme, že v rozsahu existuje mnoho nesousedících prázdných buněk a nyní musíte vybrat všechny buňky s obsahem v současnosti. Jak snadno vybrat všechny nevyplněné buňky v aplikaci Excel snadno? Existuje několik triků, jak to vyřešit.


Pomocí funkce Přejít na speciální vyberte neprázdné buňky v rozsahu

Funkce Přejít na speciální nám může pomoci vybrat neprázdné buňky ve vybraném rozsahu pomocí následujících kroků.

1. Vyberte rozsah, ze kterého vyberete všechny neprázdné buňky, a stiskněte F5 Klíč k otevření dialogového okna Přejít na. Poté klikněte na ikonu Speciální tlačítko pro otevření dialogového okna Přejít na speciální.

Pozor: Můžete také otevřít Přejít na speciální dialogové okno přímo kliknutím na Domů > Najít a vybrat > Přejít na speciální.

2. V dialogovém okně Přejít na speciální zaškrtněte políčko Konstanty volba, Čísla volba, Text volba, Logika možnost a chyby a klepněte na tlačítko OK .

Nyní uvidíte, že v zadaném rozsahu jsou vybrány pouze neprázdné buňky s obsahem. Viz níže screenshoty:

Jedním kliknutím vyberete všechny neprázdné buňky v rozsahu v aplikaci Excel

Kutools pro Excel Vyberte neprázdné buňky nástroj vám pomůže rychle vybrat všechny neprázdné buňky ze zvoleného rozsahu pouhým jedním kliknutím.


ad vyberte neprázdné buňky

Vyberte neprázdné buňky v rozsahu pomocí VBA

Zde poskytujeme makro VBA pro výběr všech neprázdných buněk ze zadaného rozsahu. Postupujte prosím následovně:

1. zmáčkni Další + F11 klávesy pro otevření okna Microsoft Visual Basic pro aplikace.

2, Klepněte na tlačítko Vložit > Modula poté vložte následující kód VBA do okna otevíracího modulu.

VBA: Vyberte neprázdné buňky z rozsahu

Sub SelectNonBlankCells()
Dim Rng As Range
Dim OutRng As Range
Dim InputRng As Range
Dim xTitle As String
On Error Resume Next
xTitle = Application.ActiveWindow.RangeSelection.Address
Set InputRng = Application.InputBox("Range :", "KutoolsforExcel", xTitle, Type:=8)
Set InputRng = Application.Intersect(InputRng, Application.ActiveSheet.UsedRange)
For Each Rng In InputRng
If Not Rng.Value = "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Application.Union(OutRng, Rng)
End If
End If
Next
If Not (OutRng Is Nothing) Then
OutRng.Select
End If
End Sub

3. zmáčkni F5 klíč nebo klikněte na Běh tlačítko pro spuštění tohoto VBA.

4. V úvodním dialogovém okně zadejte rozsah, ve kterém vyberete pouze neprázdné buňky, a klikněte na OK .

Nyní jsou všechny neprázdné buňky okamžitě vybrány v určeném rozsahu.


Vyberte neprázdné buňky v rozsahu pomocí Kutools pro Excel

Kutools pro Excel Vyberte neprázdné buňky nástroj umožňuje vybrat všechny neprázdné buňky z určitého rozsahu pouhým jedním kliknutím.

Kutools pro Excel - Baleno s více než 300 základními nástroji pro Excel. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Stáhnout nyní!

Vyberte rozsah, který vyberete pouze neprázdné buňky, a klikněte na Kutools > vybrat > Vyberte neprázdné buňky.

Nyní jsou najednou vybrány všechny neprázdné buňky ve specifikovaném rozsahu.

Kutools pro Excel - Supercharge Excel s více než 300 základními nástroji. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Get It Now


Ukázka: vyberte neprázdné buňky v rozsahu v aplikaci Excel


Kutools pro Excel: Více než 300 užitečných nástrojů na dosah ruky! Začněte svou 30denní bezplatnou zkušební verzi bez omezení funkcí ještě dnes. Stáhnout nyní!

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

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!