2 metoder för att räkna de totala orden på ett språk i ett flerspråkigt Word-dokument

Word-lösningar September 28, 2025

I dagens artikel vill vi presentera två metoder för att räkna de totala orden för ett språk i ett flerspråkigt Word-dokument.

Ibland kan en del av er ha krav på att redigera ett flerspråkigt Word-dokument. Som ett resultat kommer det att finnas gånger du vill göra ordräkning för ett visst språk, men bara för att hitta Word som inte kan utföra den här uppgiften.

Då är det målet att ge dig 2 användbara lösningar för att ta itu med en sådan fråga.

Metod 1: Använd alternativet “Avancerad sökning”

  1. Klicka först på triangelknappen upp och ned bakom "Sök" i gruppen "Redigering" under fliken "Hem".     Klicka på "Hem" -> knappen -> Klicka på "Avancerad sökning"
  2. Klicka nu på "Mer" i dialogrutan "Sök och ersätt".
  3. Och kryssa i rutan "Hitta bara hela ord".
  4. Klicka sedan på “Format” -knappen.
  5. Välj sedan ”Språk”.Klicka på "Format" -> Välj språk
  6. I dialogrutan "Hitta språk", hitta och välj målspråket och klicka på "OK".Välj språk-> Klicka på "OK"
  7. Gå tillbaka till rutan "Sök och ersätt", klicka på "Sök i" och välj "Huvuddokument".Klicka på "Find In" -> Välj "Main Document"
  8. Därefter ska alla engelska ord väljas och kontrollera ordräkningen i nedre vänstra hörnet på skärmen. Vi kan se att numret är 93.Kontrollera ordräkningen för engelska ord

Metod 2: Kör Word Macro

  1. Till att börja med, klicka på fliken "Utvecklare".
  2. Klicka sedan på “Visual Basic” för att utlösa VBA-redigeraren. Om du inte har aktiverat fliken "Utvecklare" ännu, tryck istället på "Alt + F11".Klicka på "Utvecklare" -> Klicka på "Visual Basic"
  3. Klicka sedan på “Normal” och klicka sedan på “Infoga”.
  4. Välj ”Modul”.Klicka på "Normal" -> Klicka på "Infoga" -> Klicka på "Modul"
  5. Och dubbelklicka på den nya modulen för att öppna kodningsutrymmet.
  6. Klistra sedan in följande koder där:
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
  1. Slutligen klickar du på "Kör" -knappen.Klistra in koder-> Klicka på "Kör"

Det ska finnas en meddelanderuta som dyker upp. Siffran avser de totala orden i franska texter i detta dokument.En meddelandefält som visar det totala antalet franska texter

Obs:

I kodraden “.LanguageID = wdFrench","wdfranska”Betyder franska. För att anpassa koder för mer specifik användning kan du ersätta språk-ID med det exakta språket du vill ha. Och för mer språk-ID kan du besöka: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Hantera korrupta Word-filer korrekt

Då och då kommer Word att stängas av eller frysas på grund av alla slags fel eller misstag. Säg, om du inte säkerhetskopierar filer regelbundet finns det en stor möjlighet att förlora alla värdefulla data. Och de två lösningarna som finns kvar är antingen att använda den inbyggda funktionen i Word eller få ett program till reparationsdokMed tanke på att det förra inte verkar fungera så bra under de flesta perioder är det lämpligt att välja ett tredjepartsverktyg.

Författarintroduktion:

Vera Chen är en dataåterställningsexpert i DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive Excel-fix och pdf reparera programvaruprodukter. För mer information besök www.datanumen.com

Kommentarer är stängda.