Note: The other languages of the website are Google-translated. Back to English

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

Ř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í.

Poznámka: Můžete také otevřít Přejít na speciální dialogové okno přímo kliknutím na Home > 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 - Obsahuje více než 300 užitečných nástrojů pro Excel. Plná zkušební verze zdarma 30-den, není potřeba kreditní karta! Zkušební verze zdarma hned teď!

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 - Obsahuje více než 300 užitečných nástrojů pro Excel. Plná zkušební verze zdarma 30-den, není potřeba kreditní karta! Get It Now


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


Kutools pro Excel obsahuje více než 300 šikovných nástrojů pro Excel, které si můžete zdarma vyzkoušet bez omezení za 30 dní. Stáhněte si a vyzkoušejte zdarma hned!

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

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!
officetab dno
Komentáře (0)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL