Çoxdilli Word Sənədində bir dilin ümumi sözlərini hesablamaq üçün 2 üsul

Bugünkü məqaləmizdə çoxdilli Word sənədində bir dilin ümumi sözlərini saymaq üçün 2 üsul təqdim etmək istərdik.

Bəzən bəziləriniz çoxdilli Word sənədini redaktə etmək tələbi ilə qarşılaşa bilər. Nəticədə, müəyyən bir dil üçün söz saymaq istədiyiniz vaxtlar olacaq, ancaq Word-ün bu tapşırığı yerinə yetirə bilməyəcəyini tapmaq üçün.

Sonra belə bir problemi həll etmək üçün sizə 2 faydalı həll yolu təqdim etmək məqsədi daşıyır.

Metod 1: "Qabaqcıl Tapma" Seçimindən istifadə edin

1. Əvvəlcə "Ev" sekmesinin altındakı "Redaktə" qrupunda "Tap"ın arxasındakı tərs üçbucaq düyməsini basın.     
2. İndi "Tap və dəyişdir" informasiya qutusunda "Daha çox" düyməsini basın.
3. Və "Yalnız bütün sözləri tap" qutusunu yoxlayın.
4. Sonra "Format" düyməsini basın.
5. Sonra "Dil" seçin.
6. "Dil tap" informasiya qutusunda hədəf dili tapın, seçin və "OK" düyməsini basın.
7. İndi "Tap və dəyişdir" qutusuna qayıdın, "Tap" düyməsini basın və "Əsas sənəd" seçin.
8. Sonra bütün ingilis sözləri seçiləcək və ekranın aşağı sol küncündə söz sayını yoxlamaq üçün keçin. Bu rəqəmin 93 olduğunu görə bilərik.

Metod 2: Word Makronunu işə salın

1. Başlamaq üçün "Geliştirici" sekmesini vurun.
2. Sonra VBA redaktorunu işə salmaq üçün “Visual Basic” üzərinə klikləyin. Əgər "Tərtibatçı" sekmesini hələ aktiv etməmisinizsə, bunun əvəzinə "Alt + F11" düyməsini basın.
3. Sonra "Normal" düyməsini basın və sonra "Daxil et" düyməsini basın.
4. "Modul" seçin.
5. Və kodlaşdırma sahəsini açmaq üçün yeni modula iki dəfə klikləyin.
6. Sonra aşağıdakı kodları ora yapışdırın:

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. Nəhayət, "Çalış" düyməsini basın.

Bir mesaj qutusu açılacaq. Sayı bu sənəddəki fransız mətnlərinin ümumi sözlərinə istinad edir.

Qeyd:

Kod xəttində ".LanguageID = wdFrench","wdFransız” fransız dili deməkdir. Kodları daha konkret istifadə üçün fərdiləşdirmək üçün siz dil identifikatorunu istədiyiniz dillə əvəz edə bilərsiniz. Və daha çox dil identifikatoru üçün ziyarət edə bilərsiniz: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Zədələnmiş Word fayllarını düzgün idarə edin

İndi və sonra Word hər cür səhv və ya səhvlərə görə bağlanacaq və ya donacaq. Deyək ki, faylları müntəzəm olaraq ehtiyat nüsxəsini çıxara bilmirsinizsə, bütün qiymətli məlumatların itirilməsi ehtimalı böyükdür. Və qalan 2 həll yolu ya Word-ün daxili funksiyasından istifadə etmək, ya da proqram əldə etməkdir təmir dokBirincisinin əksər hallarda o qədər də yaxşı işləmədiyini nəzərə alsaq, üçüncü tərəf alətini seçmək məsləhətdir.

Müəllif Giriş:

Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc Excel düzəlişi və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com