Олон хэлтэй Word баримт бичигт нэг хэлний нийт үгийг тоолох 2 арга

Өнөөдрийн нийтлэлээр бид олон хэлтэй Word баримт бичигт нэг хэлний нийт үгийг тоолох 2 аргыг танилцуулахыг хүсч байна.

Заримдаа та нарын зарим нь олон хэлтэй Word баримт бичгийг засварлах хүсэлттэй байж магадгүй юм. Үүний үр дүнд та тодорхой нэг хэлээр үг тоолохыг хүсэх ч Word програмыг энэ даалгаврыг гүйцэтгэх боломжгүй байх тохиолдол гардаг.

Тэгвэл танд ийм асуудлыг шийдвэрлэх 2 ашигтай шийдлийг санал болгохыг зорьж байна.

Арга 1: "Advanced Find" сонголтыг ашиглана уу

1. Эхлээд "Нүүр хуудас" табын доор байрлах "Засварлах" бүлгийн "Олох" гэдгийн ард байрлах урвуу гурвалжин товчийг дарна уу.     
2. Одоо "Олох ба солих" харилцах цонхонд "Илүү" товчийг дарна уу.
3. Мөн "Зөвхөн бүх үгийг олох" нүдийг чагтална уу.
4. Дараа нь "Формат" товчийг дарна уу.
5. Дараа нь "Хэл" -ийг сонгоно уу.
6. "Хэл хайх" харилцах цонхонд хүссэн хэлээ олоод сонгоод "OK" товчийг дарна уу.
7. Одоо "Ол, солих" талбарт буцаж очоод "Олох" дээр товшоод "Үндсэн баримт" -ыг сонгоно уу.
8. Дараа нь бүх англи үгсийг сонгоод дэлгэцийн зүүн доод буланд байгаа үгийн тоог шалгана уу. Бид 93 тоог харж болно.

Арга 2: Word макро ажиллуулах

1. Эхлэхийн тулд "Хөгжүүлэгч" таб дээр дарна уу.
2. Дараа нь VBA засварлагчийг ажиллуулахын тулд "Visual Basic" дээр дарна уу. Хэрэв та "Хөгжүүлэгч" табыг хараахан идэвхжүүлээгүй бол "Alt+ F11" товчийг дарна уу.
3. Дараа нь "Хэвийн" дээр дараад "Оруулах" дээр дарна уу.
4. “Модуль” -ыг сонгоно уу.
5. Мөн шинэ модуль дээр давхар товшоод кодлох зайг нээнэ үү.
6. Дараа нь дараах кодыг наа.

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

7. Эцэст нь "Ажиллуулах" товчийг дарна уу.

Зурвасын хайрцаг гарч ирэх болно. Энэ тоо нь энэ баримт бичгийн франц хэл дээрх бичвэрүүдийн нийт үгсийг илэрхийлнэ.

Тайлбар:

Кодын мөрөнд “.LanguageID = wdFrench"Нь"wdФранц” гэдэг нь франц хэл гэсэн үг. Кодуудыг илүү тодорхой ашиглахын тулд та хэлний ID-г хүссэн хэлээрээ сольж болно. Мөн илүү олон хэлний ID-г авахын тулд та дараах хаягаар зочилж болно: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Гэмтсэн Word файлуудыг зөв боловсруулах

Үе үе үе бүх төрлийн алдаа, алдаанаас болж Word унтрах юм уу царцах болно. Хэрэв та файлуудаа байнга нөөцлөхгүй бол бүх үнэт мэдээллээ алдах магадлал өндөр байна гэж хэлээрэй. Мөн Word-ийн суулгасан функцийг ашиглах эсвэл програм олж авах 2 арга зам үлдлээ засвар бичигЭхнийх нь ихэнхдээ тийм ч сайн ажилладаггүй мэт санагддаг тул гуравдагч талын хэрэгслийг сонгох нь зүйтэй.

Зохиогчийн танилцуулга:

Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. Excel засах болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com