U članku ispod želimo da vam pružimo 2 korisne metode za neizrazito pretraživanje u vašem Word dokumentu.
Ponekad se desi da zaboravimo kako se pravilno piše riječ, posebno kada je duga. Većinu vremena, jedva pamtimo samo nekoliko početnih slova. Zbog toga je precizna pretraga gotovo nemoguća.
Na našu sreću, postoje načini za fuzzy-pretragu. I možete ih koristiti u svom Word dokumentu.
Metoda 1: Koristite funkciju „Napredno traženje“ u programu Word
U našem slučaju, tražit ćemo “DataNumen“, pod pretpostavkom da se samo sjećamo da počinje sa “Podaci”.
- Prvo, u grupi „Uređivanje“ na kartici „Početna“ kliknite na dugme padajućeg menija pored komande „Pronađi“.
- I na tom izborniku odaberite opciju "Napredno traženje".
- Zatim stavite pokazivač umetanja u okvir za tekst "Pronađi šta" i tamo zalijepite sljedeće zamjenske znakove:
- „Podaci“ su početna slova ciljne riječi. Trebali biste ih zamijeniti stvarnim slovima. U slučaju da zaboravite početna slova, ostavite polje prazno i nemojte unositi ni razmak.
- A „n,m“ predstavlja broj preostalih slova ciljne riječi, isključujući početna slova. Recimo, u ovom slučaju, to je broj „5“. Dakle, džoker znakovi bi trebali izgledati ovako:
- Ako niste sigurni u tačan broj dužine slova, možete unijeti 2 broja koja označavaju raspon, kao što su:
- A ako ste sigurni da je dužina slova jednaka ili veća od određenog broja, onda ga unesite u izraz, na ovaj način:
- Zatim kliknite na „Više“ da biste prikazali više opcija.
- Označite polje "Koristi zamjenske znakove".
- Zatim kliknite na “Pronađi u” i odaberite “Glavni dokument”.
Vidjet ćete sva pojavljivanja ciljane riječi u odabiru.
Metoda 2: Pokrenite VBA kodove za traženje teksta
Pokretanje VBA kodova može vas spasiti od pamćenja izraza.
- Prvo i najvažnije, pritisnite "Alt+F11" da biste pozvali VBA editor u Wordu.
- Zatim kliknite na “Normal” projekt i kliknite na “Insert” zatim.
- U meniju izaberite „Modul“.
- Dvaput kliknite na njega da otvorite i tamo zalijepite sljedeće kodove:
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
- Zatim pritisnite “F5” da pokrenete makro.
- U prvo polje za unos koje se pojavi unesite početna slova ciljne riječi i kliknite na "OK" da biste nastavili.
- U drugom polju unesite broj dužine slova i kliknite na "OK". Koristite zarez za razdvajanje brojeva.
Na kraju, sve pronađene riječi će biti označene žutom bojom.
Popravite probleme sa Wordom
Češće nego ne, u Wordu će se vjerovatno pojaviti različiti problemi. Neki ozbiljni mogu čak dovesti do kolapsa softvera. I a pokvarena riječ može dovesti do gubitka vrijednih podataka. Stoga morate poduzeti hitne mjere kada se problem pojavi.
Uvod za autora:
Vera Chen je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući excel corruption i pdf popravak softverskih proizvoda. Za više informacija posjetite www.datanumen.com





