Ko'p tilli Word hujjatida bitta tildagi jami so'zlarni hisoblashning 2 usuli

Word yechimlari Sentyabr 28, 2025
Hozir ulashing:

Bugungi maqolamizda ko'p tilli Word hujjatida bitta tilning umumiy so'zlarini hisoblashning 2 usulini taqdim qilmoqchimiz.

Vaqti-vaqti bilan, ba'zilaringiz ko'p tilli Word hujjatini tahrirlashni talab qilishi mumkin. Natijada, ba'zida siz ma'lum bir til uchun so'zlarni hisoblashni xohlaysiz, ammo Word bu vazifani bajarolmaydi.

Keyin sizga bunday muammoni hal qilish uchun 2 ta foydali echimni taqdim etishni maqsad qilgan.

1-usul: "Kengaytirilgan qidirish" opsiyasidan foydalaning

  1. Birinchidan, "Uy" yorlig'i ostidagi "Tahrirlash" guruhidagi "Topish" orqasidagi teskari uchburchak tugmasini bosing.     "Uy"->Tugma->"Kengaytirilgan qidiruv"-ni bosing.
  2. Endi "Topish va almashtirish" dialog oynasida "Ko'proq" tugmasini bosing.
  3. Va "Faqat butun so'zlarni toping" katagiga belgi qo'ying.
  4. Keyin "Format" tugmasini bosing.
  5. Keyin "Til" ni tanlang."Format" -> Tilni tanlang
  6. "Tilni topish" muloqot oynasida maqsadli tilni toping va tanlang va "OK" tugmasini bosing.Tilni tanlang-> "OK" tugmasini bosing
  7. Endi "Topish va almashtirish" oynasiga qayting, "Topish" tugmasini bosing va "Asosiy hujjat" ni tanlang."Topish" tugmasini bosing -> "Asosiy hujjat" ni tanlang
  8. Keyin barcha inglizcha so'zlar tanlanadi va ekranning pastki chap burchagidagi so'zlar sonini tekshirishga o'ting. Biz raqam 93 ekanligini ko'ramiz.Inglizcha so'zlar uchun so'zlar sonini tekshiring

2-usul: Word makrosini ishga tushiring

  1. Boshlash uchun "Dasturchi" yorlig'ini bosing.
  2. Keyin VBA muharririni ishga tushirish uchun "Visual Basic" tugmasini bosing. Agar siz hali “Dasturchi” yorlig'ini yoqmagan bo'lsangiz, uning o'rniga “Alt+ F11” tugmasini bosing."Ishlab chiquvchi" ni bosing -> "Visual Basic" ni bosing
  3. Keyin "Oddiy" tugmasini bosing va keyin "Qo'shish" tugmasini bosing.
  4. "Modul" ni tanlang."Oddiy"-ni bosing->"Qo'shish"-ni bosing->"Modul"-ni bosing.
  5. Va kodlash maydonini ochish uchun yangi modulni ikki marta bosing.
  6. Keyin u erga quyidagi kodlarni joylashtiring:
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. Nihoyat, "Ishga tushirish" tugmasini bosing.Kodlarni joylashtirish -> "Ishga tushirish" tugmasini bosing

Xabar oynasi paydo bo'ladi. Raqam ushbu hujjatdagi frantsuzcha matnlarning umumiy so'zlariga ishora qiladi.Fransuz tilidagi matnlarning umumiy sonini ko'rsatadigan xabar qutisi

Eslatma:

Kod qatorida ".LanguageID = wdFrench","wdFransuz” frantsuz tilini bildiradi. Kodlarni aniqroq foydalanish uchun sozlash uchun siz til identifikatorini kerakli til bilan almashtirishingiz mumkin. Yana til identifikatori uchun quyidagi manzilga tashrif buyurishingiz mumkin: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Buzilgan Word fayllarini to'g'ri ishlating

Vaqti-vaqti bilan Word har qanday xato yoki xatolar tufayli o'chiriladi yoki muzlatib qo'yadi. Aytaylik, agar siz muntazam ravishda fayllarning zaxira nusxasini yaratmasangiz, barcha qimmatli ma'lumotlarni yo'qotishingiz mumkin. Va qolgan ikkita vaqtinchalik echim - Word-ning o'rnatilgan funktsiyasidan foydalanish yoki dasturni olish ta'mirlash docBirinchisi ko'p hollarda unchalik yaxshi ishlamasligini hisobga olsak, uchinchi tomon vositasini tanlash tavsiya etiladi.

Muallif kirish:

Vera Chen - ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc Excel tuzatish va pdf dasturiy mahsulotlarni ta'mirlash. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com

Hozir ulashing:

Comments are closed.