Přejít k hlavnímu obsahu

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 Domů > 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
Comments (10)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
how do I make a VBA to search a few times with different highlight color?

and

then how do i make the highlight area, not only in the exact cell but also the cells next to it, or the whole row?

Please advice.

Thank you.
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
how about highlight the keyword's row or column or the 3 cells next to the keyword?

and how do i search multiple times with different color of highlight?
This comment was minimized by the moderator on the site
How would I make the data entry box reopen after hitting ok? I use this macro with a barcode scanner and would like to be able to keep scanning without having to rerun macro each time. Example open macro scan it finds and highlights then reopens for next scan.
This comment was minimized by the moderator on the site
Hi, I have office 365 but when I went to Kutools > Text > I could not find Mark Keyword. Is there feature still there? Thanks
This comment was minimized by the moderator on the site
Hi, Kimber, what version of Kutools for Excel you use? Mark Keyword released after Kutools for Excel 24.0. If your version is lower than 24.0, please upgrade your version.
This comment was minimized by the moderator on the site
Does it work for Excel 2013 and what do I have to change in order to fit in with the 2003 version? I’ve tried your code but there is no button to save the module
This comment was minimized by the moderator on the site
Sorry, it’s Excel 2003
This comment was minimized by the moderator on the site
How can you modify this to also jump to the cell that is being highlighted.
This comment was minimized by the moderator on the site
Hi, Jeff, if you want to select all highlighted cells, just add
xRg.Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
If you want to jump to the first highlighted cell, add
xRg.Areas(xRg.Areas.Count)(1).Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
This comment was minimized by the moderator on the site
Hi thanks for your help but when we click ok for cancel highlighting. color of cell change. I want orignal color after cancel. What code i need to change in VBA.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations