Gå til hovedindhold

Søg og fremhæv søgeresultater i Excel

I Excel kan du bruge funktionen Find og erstat til at finde en bestemt værdi, men ved du, hvordan du fremhæver søgeresultaterne efter søgning? I denne artikel introducerer jeg to forskellige måder at hjælpe dig med at søge og fremhæve søgeresultater i mellemtiden i Excel.

Søg og fremhæv søgeresultater efter VBA-koden

Søg og fremhæv søgeresultater ved Betinget formatering

Søg og fremhæv søgeresultater med et praktisk værktøj


Søg og fremhæv søgeresultater efter VBA-koden

I Excel er der en VBA-kode, der kan hjælpe dig med at søge efter en værdi og derefter fremhæve søgeresultaterne.

1. Aktiver det ark, du vil søge i, og fremhæv resultaterne, tryk på Alt + F11 taster for at åbne Microsoft Visual Basic til applikationer vindue.

2. klik indsatte > Moduler, og indsæt nedenstående kode i det nye modul.

VBA: Fremhæv søgeresultater

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

doc-søgning fremhæver søgeresultat 1

3. Trykke F5 nøgle, så vises et søgefelt, som du kan skrive den angivne værdi, du søger efter.
doc-søgning fremhæver søgeresultat 2

4. klik OK, er de matchede resultater fremhævet med en baggrundsfarve. Der vises også en dialogboks, der spørger dig, om du annullerer fremhævningen. Klik på OK for at annullere fremhævningen og lukke dialogen skal du klikke på Ophæve for at beholde fremhævningen og lukke dialogen.
doc-søgning fremhæver søgeresultat 3

Bemærk:

1. Hvis der ikke findes nogen matchet værdi, vises en dialogboks, der minder dig om det.
doc-søgning fremhæver søgeresultat 4

2. Denne VBA fungerer for hele det aktive ark og store og små bogstaver.

ikke flytte

Ønsker du lønforhøjelse og meget tid til at ledsage familien?

Fanen Office forbedrer din effektivitet med 50%, når Microsoft Office arbejder lige nu

Utroligt, det er lettere og hurtigere at arbejde på to eller flere dokumenter end at arbejde på et.

Sammenlignet med kendte browsere er fanebladeværktøjet i Office-fanen mere kraftfuldt og mere effektivt.

Reducer hundreder af museklik og tastaturindtastning hver dag for dig, farvel med musens hånd nu.

Hvis du normalt arbejder på flere dokumenter, vil Office Tab være en god tidsbesparelse for dig.

30-dag gratis prøveperiode, ingen kreditkort kræves.

Læs mereGratis download nu


Søg og fremhæv søgeresultater ved Betinget formatering

I Excel kan funktionen Betinget formatering også automatisk fremhæve søgeresultaterne.

Hvis vi antager, at data og søgefelt vises som nedenstående skærmbillede, skal du nu gøre som nedenstående trin:
doc-søgning fremhæver søgeresultat 5

1. Vælg det område, du vil søge i, og klik på Home > Betinget formatering > Ny regel.
doc-søgning fremhæver søgeresultat 6

2. i Ny formateringsregel dialog, vælg Brug en formel til at bestemme, hvilke celler der skal formateres i Vælg en regeltype sektion, og gå derefter til tekstfeltet under Formater værdier, hvor denne formel er sandSkriv = AND ($ E $ 2 <> "", $ E $ 2 = A4).

E2 er den celle, du placerer søgeværdien, og A4 er den første celle i det område, hvor du søger i.
doc-søgning fremhæver søgeresultat 7

3. klik dannet knappen, gå til formater celler dialog under Fyld skal du vælge en farve, som du har brug for. Klik på OK > OK for at lukke dialogerne.
doc-søgning fremhæver søgeresultat 8

Fra nu af, når du indtaster nøgleordet i Cell E2, vil søgeresultaterne automatisk blive fremhævet i det angivne interval.


Søg og fremhæv søgeresultater med et praktisk værktøj

Hvis du vil søge efter to eller flere værdier og fremhæve søgeresultaterne én gang, skal du bruge den Marker nøgleord træk ved Kutools til Excel kunne give dig en tjeneste.

Kutools til Excel er et kraftfuldt tilføjelsesprogram, der samler mere end 300 praktiske værktøjer til at forbedre din effektivitet i Excel-job, klik for at få 30-dages gratis prøveversion nu.

1. Vælg det dataområde, du vil søge efter, klik Kutools > tekst > Marker nøgleord.
doc-søgning fremhæver søgeresultat 8

2. Indtast de værdier, du vil søge i, i den åbne dialog, adskilt med komma Søgeord tekstboks. Vælg derefter Marker indstillinger og skriftfarven efter behov. Klik Ok.

Hvis du ønsker at søge værdi i store og små bogstaver, skal du sætte kryds match Case afkrydsningsfelt.
doc-søgning fremhæver søgeresultat 8

Så vil de matchede resultater fremhæves med en anden skriftfarve.
doc-søgning fremhæver søgeresultat 8

Med Marker nøgleord funktion, kan du også finde en del af streng i sortimentet. Antag, at søgeceller indeholder bold eller hop, skriv bold, hop ind i Søgeord tekstboks, angiv derefter indstillingerne og klik Ok.
doc-søgning fremhæver søgeresultat 8doc-søgning fremhæver søgeresultat 8


Prøvefil

Klik for at downloade prøvefilen


Andre operationer (artikler) relateret til Conditioanl-formatering

Tæl / sum celler efter farver med betinget formatering i Excel
Nu fortæller denne tutorial dig nogle praktiske og nemme metoder til hurtigt at tælle eller summere cellerne efter farve med betinget formatering i Excel.

Opret et diagram med betinget formatering i Excel
For eksempel har du en scoretabel for en klasse, og du vil oprette et diagram for at farve scoringer i forskellige intervaller, her introducerer denne tutorial denne metode til løsning af dette job.

Betinget formatering stablet søjlediagram i Excel
Denne vejledning introducerer den, hvordan man opretter betinget formatering stablet søjlediagram som nedenstående skærmbillede vist trin for trin i Excel.

Betinget formatering af rækker eller celler, hvis to kolonner er lige i Excel
I denne artikel introducerer jeg metoden til betingede formateringsrækker eller celler, hvis to kolonner er lige i Excel.

Anvend betinget formatering for hver række i Excel
Nogle gange vil du muligvis anvende den betingede formatering for pr. Række. Bortset fra gentagne gange at indstille de samme regler for pr. Række, er der nogle tricks til at løse dette job.


  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner og opbevaring af data; Split celler indhold; Kombiner duplikatrækker og sum / gennemsnit... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Foretrukne og hurtigt indsætte formler, Områder, diagrammer og billeder; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Pivottabelgruppering efter ugenummer, ugedag og mere ... Vis ulåste, låste celler ved forskellige farver; Fremhæv celler, der har formel / navn...
kte-fane 201905
  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
officetab bund
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