Allolevas artiklis soovime teile pakkuda 2 kasulikku meetodit ähmase otsingu tegemiseks Wordi dokumendis.
Aeg-ajalt juhtub, et unustame, kuidas sõna õigesti kirjutada, eriti kui see on pikk. Enamasti mäletame vaid mõnda algustähte. See muudab täpse otsingu peaaegu võimatuks.
Meie õnneks on hägusat otsimist. Ja saate neid kasutada oma Wordi dokumendis.
1. meetod: kasutage Wordi funktsiooni „Täpsem otsing”.
Meie puhul hakkame otsima "DataNumen”, eeldades, et me lihtsalt mäletame seda, alustades sõnaga „Andmed”.
- Esiteks klõpsake vahekaardi "Kodu" all olevas rühmas "Redigeerimine" käsu "Leia" kõrval olevat rippmenüü nuppu.
- Ja selles menüüs valige suvand "Täpsem otsing".
- Seejärel asetage sisestuskursor tekstikasti „Leia mis” ja kleepige sinna järgmised metamärgid:
- „Andmed“ on sihtsõna algustähed. Need tuleks asendada päris sõnadega. Kui algustähed ununevad, jäta see väli tühjaks ja ära lisa isegi tühikut.
- Ja „n,m” tähistab sihtsõna ülejäänud tähtede arvu, välja arvatud algustähed. Näiteks antud juhul on see arv „5”. Seega peaksid metamärgid välja nägema sellised:
- Kui te pole kindel tähe pikkuse täpses numbris, võite sisestada 2 numbrit, mis näitavad vahemikku, näiteks:
- Ja kui olete kindel, et tähe pikkus on võrdne või suurem kui konkreetne arv, sisestage see avaldisesse järgmiselt:
- Järgmisena klõpsake nuppu "Veel", et kuvada rohkem valikuid.
- Märkige ruut "Kasuta metamärke".
- Seejärel klõpsake "Otsi" ja valige "Põhidokument".
Valitud sõnas näete kõiki selle esinemisjuhte.
2. meetod: teksti otsimiseks käivitage VBA koodid
VBA-koodide käitamine võib säästa väljendi meeldejätmisest.
- Esiteks ja kõige tähtsam on Wordis VBA redaktori käivitamiseks vajutada klahvikombinatsiooni „Alt+F11”.
- Järgmisena klõpsake nuppu "Tavaline" projekt ja seejärel "Insert".
- Valige menüüst "Moodul".
- Topeltklõpsake sellel, et avada ja kleepida sinna järgmised koodid:
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
- Seejärel vajutage makro käivitamiseks klahvi F5.
- Sisestage esimeses ilmuvas sisestuskastis sihtsõna algustähed ja klõpsake jätkamiseks nuppu „OK“.
- Ja teise kasti sisestage tähe pikkuse number ja klõpsake "OK". Kasutage numbrite eraldamiseks koma.
Lõpuks tõstetakse kõik leitud sõnad kollasena esile.
Parandage Wordi probleemid
Tõenäoliselt ilmnevad Wordis mitmesugused probleemid. Mõned tõsised probleemid võivad isegi viia tarkvara kokkuvarisemiseni. Ja a rikutud sõna võib põhjustada väärtuslike andmete kadumise. Seetõttu peate probleemi ilmnemisel viivitamatult tegutsema.
Autori sissejuhatus:
Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas Exceli korruptsioon ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom