U članku u nastavku želimo vam pružiti 2 korisne metode za neizrazito pretraživanje u vašem Word dokumentu.
Ponekad se dogodi da zaboravimo kako pravilno napisati riječ, posebno kada je duga. Većinu vremena jedva se sjećamo samo nekoliko početnih slova. Zbog toga je precizno pretraživanje gotovo nemoguće.
Srećom po nas, postoje načini za nejasno pretraživanje. Možete ih upotrijebiti u svom Word dokumentu.
Metoda 1: Koristite značajku "Napredno traženje" u Wordu
U našem slučaju, tražit ćemo "DataNumen“, pretpostavimo da se samo sjećamo da počinje s „Podaci”.
- Prvo, u grupi "Uređivanje" pod karticom "Početna", kliknite padajući gumb pored naredbe "Traži".
- I na tom izborniku odaberite opciju "Napredno traženje".
- Zatim stavite pokazivač umetanja unutar tekstnog okvira "Pronađi što" 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, zamjenski znakovi trebali bi izgledati ovako:
- Ako niste sigurni u točan broj duljine slova, možete unijeti 2 broja koji označavaju raspon, kao što su:
- A ako ste sigurni da je duljina slova jednaka ili veća od određenog broja, unesite je u izraz, ovako:
- Zatim kliknite "Više" da biste prikazali više opcija.
- Označite okvir "Koristi zamjenske znakove".
- Zatim kliknite "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" za pozivanje VBA editora u Wordu.
- Zatim kliknite "Normalni" projekt, a zatim kliknite "Umetni".
- U izborniku odaberite "Modul".
- Dvaput kliknite na njega da biste ga otvorili 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” za pokretanje makronaredbe.
- U prvi okvir za unos koji se pojavi unesite početna slova ciljane riječi i kliknite "U redu" za nastavak.
- A u drugi okvir unesite broj duljine slova i kliknite "OK". Za odvajanje brojeva koristite zarez.
Na kraju će sve pronađene riječi biti označene žutom bojom.
Riješite probleme s riječima
Češće nego ne, vjerojatno će se pojaviti različiti problemi u Wordu. Neki teški mogu čak dovesti do kolapsa softvera. i a pokvarena riječ može dovesti do gubitka vrijednih podataka. Stoga morate odmah poduzeti mjere kada se pojavi problem.
Uvod za autora:
Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući excel korupcija i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com





