2 methoden om het totaal aantal woorden van één taal in een meertalig Word-document te tellen

In het artikel van vandaag willen we u 2 methoden presenteren om het totale aantal woorden van één taal in een meertalig Word-document te tellen.

Af en toe hebben sommigen van u misschien de vraag om een ​​meertalig Word-document te bewerken. Als gevolg hiervan zullen er momenten zijn dat u woorden wilt tellen voor een specifieke taal, maar alleen vindt dat Word deze taak niet kan uitvoeren.

Dan is het onze bedoeling om u 2 handige oplossingen te bieden om een ​​dergelijk probleem aan te pakken.

Methode 1: Gebruik de optie "Geavanceerd zoeken"

  1. Klik eerst op de knop met de omgekeerde driehoek achter "Zoeken" in de groep "Bewerken" op het tabblad "Start".     Klik op "Home"->de knop->Klik op "Geavanceerd zoeken"
  2. Klik nu in het dialoogvenster "Zoeken en vervangen" op de knop "Meer".
  3. En vink het vakje "Alleen hele woorden zoeken" aan.
  4. Klik vervolgens op de knop "Formatteren".
  5. Kies vervolgens "Taal".Klik op "Formaat" -> Taal kiezen
  6. Zoek en selecteer de gewenste taal in het dialoogvenster "Taal zoeken" en klik vervolgens op "OK".Selecteer Taal->Klik op "OK"
  7. Ga nu terug naar het vak "Zoeken en vervangen", klik op "Zoeken in" en kies "Hoofddocument".Klik op "Zoeken in" -> Kies "Hoofddocument"
  8. Vervolgens worden alle Engelse woorden geselecteerd en ga je naar het aantal woorden in de linkerbenedenhoek van het scherm. We zien dat het nummer 93 is.Controleer het aantal woorden voor Engelse woorden

Methode 2: Voer Word Macro uit

  1. Klik om te beginnen op het tabblad "Ontwikkelaar".
  2. Klik vervolgens op "Visual Basic" om de VBA-editor te activeren. Als u het tabblad "Ontwikkelaar" nog niet hebt ingeschakeld, drukt u in plaats daarvan op "Alt + F11".Klik op "Ontwikkelaar" -> Klik op "Visual Basic"
  3. Klik vervolgens op "Normaal" en klik vervolgens op "Invoegen".
  4. Kies "Module".Klik op "Normaal" -> Klik op "Invoegen" -> Klik op "Module"
  5. En dubbelklik op de nieuwe module om de codeerruimte te openen.
  6. Plak daar dan de volgende codes:
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. Klik ten slotte op de knop "Uitvoeren".Plak Codes-> Klik op "Uitvoeren"

Er verschijnt een berichtvenster. Het aantal verwijst naar het totale aantal woorden van Franse teksten in dit document.Een berichtenvenster met het totale aantal Franse teksten

Opmerking:

In coderegel ".LanguageID = wdFrans", de "wdFrans” betekent Franse taal. Om de codes aan te passen voor meer specifiek gebruik, kunt u de taal-ID vervangen door de exacte taal die u wilt. En voor de meer taal-ID kunt u terecht op: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Behandel corrupte Word-bestanden op de juiste manier

Af en toe zal Word afsluiten of vastlopen vanwege allerlei fouten of vergissingen. Stel, als u er niet in slaagt regelmatig een back-up van bestanden te maken, is er een grote kans om alle kostbare gegevens te verliezen. En de 2 overgebleven tijdelijke oplossingen zijn ofwel om de ingebouwde functie van Word te gebruiken of om een ​​programma te downloaden reparatie docAangezien de eerstgenoemde methode in de meeste gevallen niet zo goed lijkt te werken, is het raadzaam om een ​​tool van een derde partij te kiezen.

Auteur Introductie:

Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder Excel-oplossing en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com

Reacties zijn gesloten.