In het onderstaande artikel willen we u 2 handige methoden bieden om fuzzy-zoekopdrachten in uw Word-document uit te voeren.
Het gebeurt wel eens dat we vergeten hoe we een woord correct moeten spellen, vooral als het een lang woord is. Meestal herinneren we ons nauwelijks de eerste paar letters. Daardoor is nauwkeurig zoeken bijna onmogelijk.
Gelukkig voor ons zijn er manieren om vaag te zoeken. En u kunt ze gebruiken in uw Word-document.
Methode 1: Gebruik de functie "Geavanceerd zoeken" in Word
In ons geval gaan we zoeken naar "DataNumen”, Veronderstel dat we het onthouden, beginnend met“ Data ”.
- Ten eerste, klik in de groep "Bewerken" onder het tabblad "Home" op de vervolgkeuzeknop naast de opdracht "Zoeken".
- En selecteer in dat menu de optie "Geavanceerd zoeken".
- Plaats vervolgens de invoegwijzer in het tekstvak "Zoeken naar" en plak de volgende jokertekens daar:
- "Data" zijn de beginletters van het doelwoord. U moet deze vervangen door de juiste beginletters. Als u de beginletters bent vergeten, laat het veld dan leeg en vul geen spatie in.
- En “n,m” staat voor het aantal resterende letters van het doelwoord, exclusief de beginletters. Stel, in dit geval is dat “5”. De jokers zouden er dus als volgt uit moeten zien:
- Als u niet zeker bent van het juiste aantal letters, kunt u 2 cijfers invoeren die een bereik aangeven, zoals:
- En als je zeker weet dat de letterlengte gelijk is aan of groter is dan een specifiek getal, voer het dan op de volgende manier in de uitdrukking in:
- Klik vervolgens op "Meer" om meer opties naar voren te brengen.
- Vink het vakje "Gebruik jokertekens" aan.
- Klik vervolgens op "Zoeken in" en kies "Hoofddocument".
Je ziet alle voorkomende gevallen van het doelwoord in de selectie.
Methode 2: voer VBA-codes uit om naar tekst te zoeken
Als u VBA-codes uitvoert, kunt u de uitdrukking niet onthouden.
- Druk allereerst op "Alt+F11" om de VBA-editor in Word te openen.
- Klik vervolgens op "Normaal" project en klik vervolgens op "Invoegen".
- Kies "Module" in het menu.
- Dubbelklik erop om de volgende codes te openen en te plakken:
Sub FindTheWordsByLength()
Dim objRange As Range
Dim strStartWord As String
Dim strLength As String
strStartWord = InputBox("Enter the beginning letters which you remember of target word ", "Beginning Letters of Word", "For example:Data")
strLength = InputBox("Enter the letter length of the rest part of target word which you don't remember", "Number of Letter Length", "For example:5,7")
With Selection
.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
With Selection.Find
.Text = "<" & strStartWord & "[a-zA-Z]{" & strLength & "}>"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
.Execute
End With
Do While .Find.Found
Set objRange = Selection.Range
objRange.HighlightColorIndex = wdYellow
.Collapse wdCollapseEnd
.Find.Execute
Loop
End With
End Sub
- Druk vervolgens op "F5" om de macro uit te voeren.
- Voer in het eerste invoerveld dat verschijnt de beginletters van het doelwoord in en klik op "OK" om verder te gaan.
- En voer in het tweede vak het aantal letters in en klik op "OK". Gebruik een komma om getallen te scheiden.
Ten slotte worden alle gevonden woorden geel gemarkeerd.
Los Word-problemen op
Vaker wel dan niet, zullen er waarschijnlijk verschillende problemen optreden in Word. Sommige ernstige kunnen zelfs leiden tot het instorten van de software. En een corrupt woord kan leiden tot verlies van waardevolle gegevens. Daarom moet u onmiddellijk actie ondernemen zodra zich een probleem voordoet.
Auteur Introductie:
Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder Excel corruptie en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com