I artiklen nedenfor vil vi gerne give dig 2 nyttige metoder til at gøre fuzzy-søgning i dit Word-dokument.
Det sker nu og da, at vi glemmer, hvordan man staver et ord korrekt, især hvis det er et langt ord. For det meste husker vi kun et par begyndelsesbogstaver. Dette gør præcis søgning næsten umulig.
Heldig for os er der måder til fuzzy-search. Og du kan bruge dem i dit Word-dokument.
Metode 1: Brug funktionen "Avanceret søgning" i Word
I vores tilfælde skal vi søge efter “DataNumenAntag, at vi bare husker det begyndende med “Data”.
- For det første, i gruppen "Redigering" under fanen "Hjem" skal du klikke på rullemenuen ud for "Find" -kommandoen.
- Og i denne menu skal du vælge "Avanceret søgning".
- Sæt derefter indsættelsesmarkøren inde i tekstfeltet "Find hvad" og indsæt følgende jokertegn der:
- "Data" er begyndelsesbogstaverne i målordet. Du bør erstatte dem med de rigtige. Hvis du glemmer begyndelsesbogstaverne, skal du blot lade det stå tomt og ikke engang indtaste et mellemrum.
- Og "n,m" repræsenterer nummeret på restbogstavet i målordet, eksklusive de første bogstaver. I dette tilfælde er det tallet "5". Jokertegnene skal se således ud:
- Hvis du ikke er sikker på et nøjagtigt antal bogstavlængder, kan du indtaste 2 tal, der angiver et interval, såsom:
- Og hvis du er sikker på, at bogstavlængden er lig med eller større end et bestemt tal, skal du indtaste det i udtrykket på denne måde:
- Klik derefter på "Mere" for at få flere muligheder.
- Marker afkrydsningsfeltet "Brug jokertegn".
- Klik derefter på "Find i" og vælg "Hoveddokument".
Du skal se alle forekomster af målordet i markeringen.
Metode 2: Kør VBA-koder for at søge efter tekst
At køre VBA-koder kan spare dig for at huske udtrykket.
- Først og fremmest skal du trykke på “Alt+F11” for at åbne VBA-editoren i Word.
- Klik derefter på “Normal” -projektet, og klik derefter på “Indsæt”.
- Vælg "Module" i menuen.
- Dobbeltklik på den for at åbne og indsætte følgende koder der:
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
- Tryk derefter på "F5" for at køre makroen.
- I det første indtastningsfelt, der dukker op, skal du indtaste begyndelsesbogstaverne i det ønskede ord og klikke på "OK" for at fortsætte.
- Og i det andet felt skal du indtaste antallet af bogstavlængde og klikke på “OK”. Brug komma til at adskille tal.
Endelig vil alle fundne ord blive fremhævet med gult.
Løs ordproblemer
Oftere end ikke forekommer der sandsynligvis forskellige problemer i Word. Nogle alvorlige kan endda føre til sammenbruddet af softwaren. Og en korrupt ord kan resultere i tab af værdifulde data. Derfor skal du tage øjeblikkelige handlinger, når et problem vises.
Forfatter Introduktion:
Vera Chen er en datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder excel korruption og pdf produkter til reparation af software. For mere information besøg www.datanumen.com





