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

Vyhledávejte a zvýrazňujte výsledky vyhledávání v aplikaci Excel

V aplikaci Excel můžete použít funkci Najít a nahradit k vyhledání konkrétní hodnoty, ale víte, jak po hledání zvýraznit výsledky hledání? V tomto článku představuji dva různé způsoby, které vám mezitím pomohou s vyhledáváním a zvýrazněním výsledků hledání v aplikaci Excel.

Vyhledávejte a zvýrazňujte výsledky vyhledávání pomocí kódu VBA

Hledání a zvýraznění výsledků hledání pomocí Podmíněného formátování

Vyhledávejte a zvýrazňujte výsledky vyhledávání pomocí praktického nástroje


Vyhledávejte a zvýrazňujte výsledky vyhledávání pomocí kódu VBA

V aplikaci Excel existuje kód VBA, který vám pomůže vyhledat hodnotu a poté zvýraznit výsledky hledání.

1. Povolte list, který chcete prohledat, a zvýrazněte výsledky, stiskněte Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.

2. cvaknutí Vložit > Modul, a vložte pod kód do nového modulu.

VBA: Zvýrazněte výsledky hledání

Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)

If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub

výsledek vyhledávání zvýraznění dokumentu 1

3. lis F5 klávesu, pak se objeví vyhledávací pole pro zadání zadané hodnoty, kterou hledáte.
výsledek vyhledávání zvýraznění dokumentu 2

4. cvaknutí OK, shodné výsledky byly zvýrazněny barvou pozadí. Objeví se také dialogové okno s dotazem, zda zrušit zvýraznění. Klepněte na OK pro zrušení zvýraznění a zavření dialogu klikněte na Zrušit zachovat zvýraznění a zavřít dialog.
výsledek vyhledávání zvýraznění dokumentu 3

Poznámka:

1. Pokud není nalezena žádná odpovídající hodnota, zobrazí se dialogové okno, které vám to připomene.
výsledek vyhledávání zvýraznění dokumentu 4

2. Tento VBA funguje pro celý aktivní list a malá a velká písmena.

ot tah

Chcete zvýšit plat a dostatek času na doprovázení rodiny?

Karta Office zvyšuje vaši efektivitu o 50% při práci s Microsoft Office právě teď

Neuvěřitelné, práce na dvou nebo více dokumentech je jednodušší a rychlejší než práce na jednom.

Ve srovnání se známými prohlížeči je nástroj s kartami na kartě Office výkonnější a efektivnější.

Omezte stovky klikání myší a psaní na klávesnici každý den za vás, sbohem teď s myší rukou.

Pokud obvykle pracujete na více dokumentech, bude vám karta Office skvělým šetřičem času.

30-denní zkušební verze zdarma, není vyžadována kreditní karta.

VíceStáhnout zdarma


Hledání a zvýraznění výsledků hledání pomocí Podmíněného formátování

V aplikaci Excel může funkce podmíněného formátování také automaticky zvýraznit výsledky hledání.

Předpokládejme, že se data a vyhledávací pole zobrazují jako níže uvedený snímek obrazovky, nyní proveďte následující kroky:
výsledek vyhledávání zvýraznění dokumentu 5

1. Vyberte rozsah, ve kterém chcete hledat, a klikněte na Home > Podmíněné formátování > Nové pravidlo.
výsledek vyhledávání zvýraznění dokumentu 6

2. V Nové pravidlo pro formátování , vyberte Pomocí vzorce určete, které buňky chcete formátovat v Vyberte typ pravidla a přejděte do textového pole pod Formátovat hodnoty, kde je tento vzorec pravdivý, typ = AND ($ E $ 2 <> "", $ E $ 2 = A4).

E2 je buňka, do které umístíte hledanou hodnotu, a A4 je první buňka v rozsahu, ve kterém hledáte.
výsledek vyhledávání zvýraznění dokumentu 7

3. cvaknutí Formát tlačítko, přejděte na Formát buněk dialogové okno pod Vyplnit Na kartě vyberte jednu barvu podle potřeby. Klepněte na OK > OK zavřete dialogy.
výsledek vyhledávání zvýraznění dokumentu 8

Od této chvíle, když zadáte klíčové slovo do buňky E2, výsledky vyhledávání se automaticky zvýrazní v zadaném rozsahu.


Vyhledávejte a zvýrazňujte výsledky vyhledávání pomocí praktického nástroje

Pokud chcete prohledat dvě nebo více hodnot a jednou zvýraznit výsledky vyhledávání, použijte Označit klíčové slovo vlastnost Kutools pro Excel by ti mohl dát laskavost.

Kutools pro Excel je výkonný doplněk, který shromažďuje více než 300 užitečných nástrojů pro zvýšení efektivity práce v Excelu. Kliknutím získáte 30denní bezplatnou zkušební verzi.

1. Vyberte rozsah dat, který chcete prohledávat, klepněte na Kutools > text > Označit klíčové slovo.
výsledek vyhledávání zvýraznění dokumentu 8

2. V vyskakovacím dialogu zadejte hodnoty, které chcete vyhledat, a oddělte je čárkou Klíčové slovo Textové pole. Poté vyberte Označte možnosti a barvu písma, jak potřebujete. Klikněte Ok.

Pokud chcete hodnotu hledat s rozlišením malých a velkých písmen, zaškrtněte Zápas Case checkbox.
výsledek vyhledávání zvýraznění dokumentu 8

Poté se odpovídající výsledky zvýrazní jinou barvou písma.
výsledek vyhledávání zvýraznění dokumentu 8

S Označit klíčové slovo můžete také najít část řetězce v rozsahu. Předpokládejme, že vyhledávací buňky obsahují míč nebo skok, zadejte míč, skočte do Klíčové slovo textové pole, poté zadejte nastavení a klepněte na Ok.
výsledek vyhledávání zvýraznění dokumentu 8výsledek vyhledávání zvýraznění dokumentu 8


Ukázkový soubor

Kliknutím stáhnete ukázkový soubor


Další operace (články) související s podmíněným formátováním

Počítání / součet buněk podle barev s podmíněným formátováním v aplikaci Excel
Tento výukový program vám nyní řekne několik praktických a snadných metod, jak rychle spočítat nebo sečíst buňky podle barvy s podmíněným formátováním v aplikaci Excel.

Vytvořte graf s podmíněným formátováním v aplikaci Excel
Například máte tabulku skóre třídy a chcete vytvořit graf pro obarvení skóre v různých rozsazích, zde tento kurz představí metodu řešení této úlohy.

Podmíněné formátování skládaného sloupcového grafu v aplikaci Excel
V tomto kurzu se dozvíte, jak vytvořit podmíněné formátování skládaného sloupcového grafu, jak je znázorněno níže, snímek obrazovky krok za krokem v aplikaci Excel.

Podmíněné formátování řádků nebo buněk, pokud jsou dva sloupce v aplikaci Excel stejné
V tomto článku představuji metodu podmíněného formátování řádků nebo buněk, pokud jsou dva sloupce v aplikaci Excel stejné.

Použijte podmíněné formátování pro každý řádek v aplikaci Excel
Někdy možná budete chtít použít podmíněné formátování pro každý řádek. Kromě opakovaného nastavení stejných pravidel pro každý řádek existují některé triky, jak tuto úlohu vyřešit.


  • 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 a uchovávání údajů; Rozdělit obsah buněk; Zkombinujte duplicitní řádky a součet / průměr... 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ší ...
  • Oblíbené a rychlé vkládání vzorců„Rozsahy, grafy a obrázky; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • 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...
  • Seskupování kontingenčních tabulek podle číslo týdne, den v týdnu a další ... Zobrazit odemčené, zamčené buňky různými barvami; Zvýrazněte buňky, které mají vzorec / název...
karta kte 201905
  • 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 (5)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Ahoj, děkujeme za pomoc, ale když klikneme na tlačítko OK, zrušíme zvýraznění. změna barvy buňky. Po zrušení chci původní barvu. Jaký kód musím změnit ve VBA.
Tento komentář byl moderátorem webu minimalizován
Jak to můžete upravit tak, aby také skočilo na buňku, která je zvýrazněna.
Tento komentář byl moderátorem webu minimalizován
Ahoj, Jeffe, pokud chceš vybrat všechny zvýrazněné buňky, stačí přidat
xRg.Select
na konci výše uvedeného kódu, viz snímek obrazovky:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
Pokud chcete přejít na první zvýrazněnou buňku, přidejte
xRg.Areas(xRg.Areas.Count)(1).Select
na konci výše uvedeného kódu, viz snímek obrazovky:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
Tento komentář byl moderátorem webu minimalizován
Funguje to pro Excel 2013 a co musím změnit, abych se vešel do verze 2003? Zkoušel jsem váš kód, ale neexistuje žádné tlačítko pro uložení modulu
Tento komentář byl moderátorem webu minimalizován
Pardon, je to Excel 2003
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