Ga naar hoofdinhoud

Zoek en markeer zoekresultaten in Excel

In Excel kunt u de functie Zoeken en vervangen gebruiken om een ​​specifieke waarde te vinden, maar weet u hoe u de zoekresultaten markeert na het zoeken? In dit artikel introduceer ik twee verschillende manieren om u te helpen bij het zoeken en markeren van zoekresultaten in Excel.

Zoek en markeer zoekresultaten met de VBA-code

Zoek en markeer zoekresultaten door de voorwaardelijke opmaak

Zoek en markeer zoekresultaten met een handige tool


Zoek en markeer zoekresultaten met de VBA-code

In Excel is er een VBA-code waarmee u een waarde kunt zoeken en vervolgens de zoekresultaten kunt markeren.

1. Schakel het blad in dat u wilt zoeken en markeer de resultaten, druk op Alt + F11 sleutels om te openen Microsoft Visual Basic voor toepassingen venster.

2. klikken Invoegen > Module, en plak onderstaande code in de nieuwe module.

VBA: markeer zoekresultaten

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

document zoeken markeer zoekresultaat 1

3. druk op F5 key, dan verschijnt er een zoekvak waarin u de opgegeven waarde kunt typen die u zoekt.
document zoeken markeer zoekresultaat 2

4. klikken OK, zijn de overeenkomende resultaten gemarkeerd met een achtergrondkleur. Er verschijnt ook een dialoogvenster waarin u wordt gevraagd of u de markering wilt annuleren. Klik OK Klik op om het markeren te annuleren en het dialoogvenster te sluiten Annuleer om de markering te behouden en het dialoogvenster te sluiten.
document zoeken markeer zoekresultaat 3

Note:

1. Als er geen overeenkomende waarde is gevonden, verschijnt er een dialoogvenster om u eraan te herinneren.
document zoeken markeer zoekresultaat 4

2. Deze VBA werkt voor het hele actieve blad en is niet hoofdlettergevoelig.

iet bewegen

Wilt u een loonsverhoging en veel tijd om met uw gezin te begeleiden?

Office-tabblad verbetert uw efficiëntie met 50% in Microsoft Office dat nu werkt

Ongelofelijk, werken aan twee of meer documenten is gemakkelijker en sneller dan werken aan één.

In vergelijking met bekende browsers is de tool met tabbladen in Office Tab krachtiger en efficiënter.

Verminder elke dag honderden muisklikken en typen op het toetsenbord, zeg nu gedag tegen de muishand.

Als u gewoonlijk aan meerdere documenten werkt, bespaart Office Tab u veel tijd.

30-dag gratis op proef, geen kredietkaart nodig.

Lees meerGratis nu downloaden


Zoek en markeer zoekresultaten door de voorwaardelijke opmaak

In Excel kan de functie voorwaardelijke opmaak ook automatisch de zoekresultaten markeren.

Stel dat de gegevens en het zoekvak worden weergegeven zoals onder de schermafbeelding, voer dan de onderstaande stappen uit:
document zoeken markeer zoekresultaat 5

1. Selecteer het bereik waarin u wilt zoeken en klik op Home > Conditionele opmaak > Nieuwe regel.
document zoeken markeer zoekresultaat 6

2. In de Nieuwe opmaakregel dialoogvenster, selecteer Gebruik een formule om te bepalen welke cellen moeten worden opgemaakt in de Selecteer een regeltype sectie, ga dan naar het tekstvak onder Formatteer waarden waar deze formule waar istype = EN ($ E $ 2 <> "", $ E $ 2 = A4).

E2 is de cel waarin u de zoekwaarde plaatst, en A4 is de eerste cel in het bereik waarin u zoekt.
document zoeken markeer zoekresultaat 7

3. klikken Formaat knop, ga naar de Cellen opmaken dialoog, onder Vulling -tab, kies een kleur als je nodig hebt. Klik OK > OK om de dialoogvensters te sluiten.
document zoeken markeer zoekresultaat 8

Vanaf nu, wanneer u het trefwoord in Cell E2 invoert, worden de zoekresultaten automatisch gemarkeerd in het opgegeven bereik.


Zoek en markeer zoekresultaten met een handige tool

Als u twee of meer waarden wilt zoeken en de zoekresultaten één keer wilt markeren, wordt de Markeer trefwoord kenmerk van Kutools for Excel kan je een gunst verlenen.

Kutools for Excel is een krachtige invoegtoepassing die meer dan 300 handige tools verzamelt om uw efficiëntie in Excel-taken te verbeteren, klik om nu een gratis proefperiode van 30 dagen te krijgen.

1. Selecteer het gegevensbereik dat u wilt doorzoeken, klik op Kutools > Tekst > Markeer trefwoord.
document zoeken markeer zoekresultaat 8

2. Typ in het popping-dialoogvenster de waarden waarnaar u wilt zoeken, gescheiden door komma's in Keyword tekstvak. Kies dan de Markeer opties en de letterkleur als je nodig hebt. Klik Ok.

Als u naar waarde wilt zoeken in hoofdlettergevoelig, vink dan . aan match Case checkbox.
document zoeken markeer zoekresultaat 8

Vervolgens worden de overeenkomende resultaten gemarkeerd met een andere letterkleur.
document zoeken markeer zoekresultaat 8

Met de Markeer trefwoord feature, kunt u ook een deel van string in het assortiment vinden. Stel dat zoekcellen bal bevatten of spring, typ bal, spring in de Keyword tekstvak, specificeer vervolgens de instellingen en klik op Ok.
document zoeken markeer zoekresultaat 8document zoeken markeer zoekresultaat 8


Voorbeeldbestand

Klik om het voorbeeldbestand te downloaden


Andere bewerkingen (artikelen) met betrekking tot conditioanl-opmaak

Tel / som cellen op basis van kleuren met voorwaardelijke opmaak in Excel
Nu vertelt deze tutorial u enkele handige en eenvoudige methoden om de cellen snel op kleur te tellen of op te tellen met voorwaardelijke opmaak in Excel.

Maak een diagram met voorwaardelijke opmaak in Excel
U hebt bijvoorbeeld een scoretabel van een klas en u wilt een grafiek maken om scores in verschillende bereiken te kleuren, hier zal deze tutorial de methode introduceren voor het oplossen van deze taak.

Voorwaardelijke opmaak gestapeld staafdiagram in Excel
In deze zelfstudie wordt uitgelegd hoe u een gestapeld staafdiagram met voorwaardelijke opmaak kunt maken, zoals onderstaand screenshot stap voor stap in Excel wordt getoond.

Voorwaardelijke opmaak van rijen of cellen als twee kolommen gelijk zijn in Excel
In dit artikel introduceer ik de methode voor voorwaardelijke opmaak van rijen of cellen als twee kolommen gelijk zijn in Excel.

Pas voorwaardelijke opmaak toe voor elke rij in Excel
Soms wilt u misschien de voorwaardelijke opmaak toepassen voor per rij. Behalve het herhaaldelijk instellen van dezelfde regels voor per rij, zijn er enkele trucs om deze taak op te lossen.


  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen en het bewaren van gegevens; Gespleten cellen inhoud; Combineer dubbele rijen en som / gemiddelde... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Favoriete formules en snel invoegen, Bereiken, grafieken en afbeeldingen; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Draaitabel groeperen op weeknummer, dag van de week en meer ... Toon ontgrendelde, vergrendelde cellen door verschillende kleuren; Markeer cellen met formule / naam...
kte tabblad 201905
  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
officetab onderkant
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