2 Metode Menghitung Total Kata dari Satu Bahasa dalam Dokumen Word Multi-bahasa

Bagikan sekarang:

Pada artikel hari ini, kami ingin menyajikan kepada Anda 2 metode untuk menghitung total kata dari satu bahasa dalam dokumen Word multibahasa.

Sesekali, beberapa dari Anda mungkin memiliki permintaan untuk mengedit dokumen Word multibahasa. Akibatnya, akan ada saatnya Anda ingin menghitung kata untuk satu bahasa tertentu, tetapi hanya menemukan Word tidak dapat melakukan tugas ini.

Maka keluar bertujuan untuk memberi Anda 2 solusi berguna untuk mengatasi masalah seperti itu.

Metode 1: Gunakan Opsi "Pencarian Tingkat Lanjut".

  1. Pertama, klik tombol segitiga terbalik di belakang "Temukan" di grup "Editing" di bawah tab "Beranda".     Klik "Home"->Tombol->Klik "Advanced Find"
  2. Sekarang di kotak dialog "Temukan dan Ganti", klik tombol "Lainnya".
  3. Dan centang kotak "Temukan seluruh kata saja".
  4. Kemudian klik tombol "Format".
  5. Selanjutnya pilih “Bahasa”.Klik "Format"->Pilih Bahasa
  6. Di kotak dialog “Temukan Bahasa”, temukan dan pilih tardapatkan bahasa dan klik "OK".Pilih Bahasa->Klik "OK"
  7. Sekarang kembali ke kotak “Find and Replace”, klik “Find In” dan pilih “Main Document”.Klik "Temukan" -> Pilih "Dokumen Utama"
  8. Selanjutnya semua kata bahasa Inggris harus dipilih dan pergi untuk memeriksa jumlah kata di sudut kiri bawah layar. Kita bisa melihat jumlahnya adalah 93.Periksa Jumlah Kata untuk Kata Bahasa Inggris

Metode 2: Jalankan Makro Kata

  1. Untuk start dengan, klik tab "Pengembang".
  2. Kemudian klik "Visual Basic" untuk memicu editor VBA. Jika Anda belum mengaktifkan tab "Pengembang", tekan "Alt+ F11".Klik "Pengembang" -> Klik "Visual Basic"
  3. Selanjutnya klik "Normal" dan kemudian klik "Sisipkan".
  4. Pilih "Modul".Klik "Normal" -> Klik "Sisipkan" -> Klik "Modul"
  5. Dan klik dua kali pada modul baru untuk membuka ruang pengkodean.
  6. Kemudian tempel kode berikut di sana:
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. Terakhir, klik tombol "Run".Tempel Kode-> Klik "Jalankan"

Akan ada kotak pesan yang muncul. Jumlah tersebut mengacu pada total kata teks bahasa Prancis dalam dokumen ini.Kotak Pesan Menampilkan Jumlah Total Teks Prancis

Catatan:

Di baris kode ".LanguageID = wdPerancis", Yang"wdPerancis” berarti bahasa Perancis. Untuk menyesuaikan kode untuk penggunaan yang lebih spesifik, Anda dapat mengganti ID bahasa dengan bahasa yang Anda inginkan. Dan untuk lebih banyak ID bahasa, Anda dapat mengunjungi: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

Tangani File Word yang Rusak dengan Benar

Kadang-kadang, Word akan mati atau macet karena segala macam kesalahan atau kesalahan. Katakanlah, jika Anda gagal mencadangkan file secara teratur, ada kemungkinan besar kehilangan semua data berharga. Dan 2 solusi yang tersisa adalah menggunakan fungsi bawaan Word atau mendapatkan program untuk perbaikan doc. Mengingat fakta bahwa yang pertama tampaknya tidak bekerja dengan baik di most waktu, disarankan untuk memilih alat pihak ketiga.

Pengantar Penulis:

Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk Perbaikan Excel dan pdf memperbaiki produk perangkat lunak. Untuk informasi lebih lanjut kunjungi www.datanumen.com

Bagikan sekarang:

Komentar ditutup.