Šodienas rakstā mēs vēlamies iepazīstināt jūs ar 2 metodēm, kā saskaitīt vienas valodas kopējo vārdu skaitu vairāku valodu Word dokumentā.
Reizēm dažiem no jums var rasties pieprasījums rediģēt vairāku valodu Word dokumentu. Tā rezultātā dažkārt vēlēsities veikt vārdu skaitīšanu vienai noteiktai valodai, taču tikai tādēļ, lai atrastu, ka Word nevar veikt šo uzdevumu.
Pēc tam mērķis ir sniegt jums 2 noderīgus risinājumus šādas problēmas risināšanai.
1. metode: izmantojiet opciju “Papildu meklēšana”
- Vispirms noklikšķiniet uz otrādi apgrieztā trijstūra pogas, kas atrodas aiz "Atrast" grupā "Rediģēšana" cilnē "Sākums".
- Tagad dialoglodziņā "Atrast un aizstāt" noklikšķiniet uz pogas "Vairāk".
- Un atzīmējiet izvēles rūtiņu “Atrast tikai veselus vārdus”.
- Pēc tam noklikšķiniet uz pogas "Formatēt".
- Tālāk izvēlieties "Valoda".
- Dialoglodziņā “Atrast valodu” atrodiet un atlasiet mērķa valodu un noklikšķiniet uz “Labi”.
- Tagad atgriezieties lodziņā "Atrast un aizstāt", noklikšķiniet uz "Atrast" un izvēlieties "Galvenais dokuments".
- Tālāk ir jāizvēlas visi angļu valodas vārdi un jādodas uz vārdu skaita pārbaudi ekrāna apakšējā kreisajā stūrī. Mēs redzam, ka skaitlis ir 93.
2. metode: palaidiet Word Macro
- Lai sāktu, noklikšķiniet uz cilnes “Izstrādātājs”.
- Pēc tam noklikšķiniet uz Visual Basic, lai aktivizētu VBA redaktoru. Ja vēl neesat iespējojis cilni “Izstrādātājs”, nospiediet taustiņu kombināciju Alt+F11.
- Pēc tam noklikšķiniet uz "Parasti" un pēc tam noklikšķiniet uz "Ievietot".
- Izvēlieties “Module”.
- Un veiciet dubultklikšķi uz jaunā moduļa, lai atvērtu kodēšanas vietu.
- Pēc tam ielīmējiet šādus kodus:
Sub CountTotalWordsOfOneLanguage()
Dim objRange As Range
Dim nWords As Long
' Initialization
Set objRange = ActiveDocument.Range
nWords = 0
' Find all English words and do word count.
With objRange.Find
.LanguageID = wdFrench
Do While .Execute
nWords = nWords + objRange.ComputeStatistics(wdStatisticWords)
Loop
End With
MsgBox nWords
End Sub
- Visbeidzot, noklikšķiniet uz Palaist.
Tiks parādīts ziņojumu lodziņš. Skaitlis attiecas uz franču valodas tekstu kopējo vārdu skaitu šajā dokumentā.
Piezīme:
Kodu rindā “.LanguageID = wdfranču”,“wd franču valoda”nozīmē franču valodu. Lai pielāgotu kodus konkrētākai lietošanai, varat aizstāt valodas ID ar tieši vajadzīgo valodu. Lai uzzinātu vairāk valodu ID, varat apmeklēt: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)
Pareizi rīkojieties ar bojātiem Word failiem
Reizēm programma Word tiks izslēgta vai iesaldēta visu veidu kļūdu vai kļūdu dēļ. Sakiet, ja jums neizdodas regulāri dublēt failus, pastāv liela iespēja zaudēt visus vērtīgos datus. Un atlikušie divi risinājumi ir vai nu izmantot Word iebūvēto funkciju, vai iegūt programmu remonts docŅemot vērā to, ka pirmais lielākoties nešķiet tik labi darbojamies, ieteicams izvēlēties trešās puses rīku.
Autora ievads:
Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp Excel labojums un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar