2 วิธีการนับจำนวนคำทั้งหมดของภาษาหนึ่งในเอกสาร Word หลายภาษา

โซลูชั่น Word September 28, 2025
แบ่งปันเลย:

ในบทความวันนี้ เราขอนำเสนอ 2 วิธีในการนับจำนวนคำทั้งหมดของภาษาเดียวในเอกสาร Word หลายภาษา

นานๆ ครั้ง บางท่านอาจต้องการแก้ไขเอกสาร Word หลายภาษา ด้วยเหตุนี้ จะมีบางครั้งที่คุณต้องการนับจำนวนคำสำหรับภาษาใดภาษาหนึ่ง แต่เพียงเพื่อพบว่า Word ไม่สามารถทำงานนี้ได้

จากนั้นมีเป้าหมายที่จะมอบแนวทางแก้ไขที่มีประโยชน์ 2 ข้อแก่คุณเพื่อแก้ไขปัญหาดังกล่าว

วิธีที่ 1: ใช้ตัวเลือก“ การค้นหาขั้นสูง”

  1. ก่อนอื่น คลิกปุ่มสามเหลี่ยมกลับหัวด้านหลัง "ค้นหา" ในกลุ่ม "แก้ไข" ใต้แท็บ "หน้าแรก"     คลิก "หน้าแรก" -> ปุ่ม -> คลิก "การค้นหาขั้นสูง"
  2. ตอนนี้ในกล่องโต้ตอบ "ค้นหาและแทนที่" ให้คลิกปุ่ม "เพิ่มเติม"
  3. และทำเครื่องหมายในช่อง "ค้นหาทั้งคำเท่านั้น"
  4. จากนั้นคลิกปุ่ม “รูปแบบ”
  5. ถัดไปเลือก "ภาษา"คลิก "รูปแบบ" -> เลือกภาษา
  6. ในกล่องโต้ตอบ “ค้นหาภาษา” ให้ค้นหาและเลือกภาษาเป้าหมาย แล้วคลิก “ตกลง”เลือกภาษา->คลิก "ตกลง"
  7. ตอนนี้กลับไปที่ช่อง "ค้นหาและแทนที่" คลิก "ค้นหาใน" และเลือก "เอกสารหลัก"คลิก "ค้นหาใน" -> เลือก "เอกสารหลัก"
  8. จากนั้นให้เลือกคำศัพท์ภาษาอังกฤษทั้งหมดและไปตรวจสอบจำนวนคำที่มุมซ้ายล่างของหน้าจอ เราเห็นตัวเลขคือ 93ตรวจสอบจำนวนคำสำหรับคำภาษาอังกฤษ

วิธีที่ 2: เรียกใช้ Word Macro

  1. เริ่มต้นด้วยการคลิกแท็บ “นักพัฒนา”
  2. จากนั้นคลิก "Visual Basic" เพื่อเรียกใช้โปรแกรมแก้ไข VBA ในกรณีที่คุณยังไม่ได้เปิดใช้งานแท็บ “นักพัฒนา” ให้กด “Alt+ F11” แทนคลิก "นักพัฒนา" -> คลิก "Visual Basic"
  3. คลิกถัดไป "ปกติ" จากนั้นคลิก "แทรก"
  4. เลือก "โมดูล"คลิก "Normal" -> คลิก "Insert" -> คลิก "Module"
  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
  1. สุดท้ายคลิกปุ่ม“ Run”วางรหัส -> คลิก "เรียกใช้"

จะมีกล่องข้อความโผล่ขึ้นมา ตัวเลขหมายถึงจำนวนคำทั้งหมดของข้อความภาษาฝรั่งเศสในเอกสารนี้กล่องข้อความแสดงจำนวนข้อความภาษาฝรั่งเศสทั้งหมด

หมายเหตุ:

ในบรรทัดรหัส“.LanguageID = wdFrench”,“wdภาษาฝรั่งเศส” หมายถึงภาษาฝรั่งเศส หากต้องการปรับแต่งโค้ดสำหรับการใช้งานที่เฉพาะเจาะจงมากขึ้น คุณสามารถแทนที่ ID ภาษาด้วยภาษาที่คุณต้องการได้ และสำหรับรหัสภาษาเพิ่มเติม คุณสามารถไปที่: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa172988(v=office.11)

จัดการไฟล์ Word ที่เสียหายอย่างเหมาะสม

บางครั้ง Word จะปิดหรือหยุดทำงานเนื่องจากข้อผิดพลาดหรือข้อผิดพลาดทุกประเภท เช่น หากคุณไม่สามารถสำรองไฟล์เป็นประจำ มีความเป็นไปได้สูงที่จะสูญเสียข้อมูลอันมีค่าทั้งหมด และวิธีแก้ไขอีก 2 วิธีที่เหลือคือใช้ฟังก์ชันในตัวของ Word หรือรับโปรแกรมมา ซ่อมแซมเอกสารเนื่องจากวิธีการแรกมักไม่ได้ผลดีนักในหลายๆ ครั้ง จึงควรเลือกใช้เครื่องมือจากผู้ให้บริการภายนอกจะดีกว่า

บทนำผู้เขียน:

Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ แก้ไข Excel และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.

แบ่งปันเลย:

ความเห็นถูกปิด