2 วิธีด่วนในการค้นหาเอกสาร Word ด้วยจำนวนหน้าที่ระบุ

แบ่งปันเลย:

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

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

วิธีแก้ปัญหาด้านล่างนี้จะช่วยให้คุณค้นหาเอกสาร Word เป้าหมายที่มีจำนวนหน้าตามที่ต้องการได้

วิธีที่ 1: ค้นหาใน Window Explorer

  1. ขั้นแรก ให้คลิก “เริ่ม”
  2. จากนั้นคลิก“ คอมพิวเตอร์” เพื่อเปิด windows explorer หรือหากไอคอน File explorer อยู่บนทาสก์บาร์ของคุณอยู่แล้วให้คลิกที่ไอคอนนั้นคลิก "เริ่ม" -> คลิก "คอมพิวเตอร์"
  3. จากนั้นไปที่ดิสก์และตำแหน่งเฉพาะที่คุณเก็บไฟล์ทั้งหมด
  4. ตอนนี้คลิกขวาที่พื้นที่ว่างในแถวแรก
  5. เลือก "ประเภท" และ "หน้า" หากมองไม่เห็นที่นั่นให้คลิก“ เพิ่มเติม” ที่ด้านล่างของเมนูคลิกขวาที่ Empty Place ในแถวแรก -> เลือก "Type" และ "Pages"
  6. ในช่อง "เลือกรายละเอียด" เปิดขึ้นให้เลือกช่อง "หน้า" และ "ประเภท" แล้วคลิก "ตกลง"ช่องทำเครื่องหมาย -> คลิก "ตกลง"
  7. จากนั้นเลื่อนเคอร์เซอร์ไปที่คอลัมน์“ Type” จนกระทั่งปุ่มดรอปดาวน์ปรากฏขึ้น คลิกเลย
  8. เลือกช่อง“ เอกสาร Microsoft Word” คุณสามารถเห็นเฉพาะเอกสาร Word ที่เหลืออยู่ จากนั้นดูคอลัมน์ "หน้า" เพื่อค้นหาเอกสารที่มีจำนวนหน้าที่ระบุเลือกช่อง "เอกสาร Microsoft Word"

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

  1. อันดับแรก ให้กด “Alt+F11” เพื่อเรียกใช้โปรแกรมแก้ไข VBA ใน Word
  2. จากนั้นคลิก“ ปกติ” แล้วคลิก“ แทรก” บนแถบเครื่องมือ
  3. เลือก "โมดูล" เพื่อสร้างใหม่คลิก "Normal" -> คลิก "Insert" -> คลิก "Module"
  4. จากนั้นดับเบิลคลิกเพื่อเปิดพื้นที่เขียนโค้ดทางขวามือ
  5. วางมาโครต่อไปนี้ที่นั่น:
Sub FindWordDocumentWithSpecificPageNumber()
  Dim lPageNumber As Long
  Dim lSpecificPageNumber As Long
  Dim strDocList As String
  Dim strDocName As String
  Dim objWordApplication As New Word.Application
  Dim strFile As String
  Dim strFolder As String

  strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
  lSpecificPageNumber = InputBox("Enter the page number you want to search", "Specific Page Number", "For example:1")
 
  strFile = Dir(strFolder & "*.doc*", vbNormal)
 
  While strFile <> ""
    With objWordApplication
      .Documents.Open (strFolder & strFile)
      lPageNumber = .ActiveDocument.ComputeStatistics(wdStatisticPages)

      If lPageNumber = lSpecificPageNumber Then
        strDocName = .ActiveDocument.FullName
        strDocList = strDocList & strDocName & vbCr 
      End If
 
      .ActiveDocument.Close
    End With
    strFile = Dir()
  wend
  Set objWordApplication = Nothing
 
  If strDocList <> "" Then
    Documents.Add Template:="Normal"
    ActiveDocument.Range.Text = strDocList
  Else
    MsgBox ("There is no match document.")
  End If
End Sub
  1. จากนั้นคลิกปุ่ม“ Run” หรือกด“ F5”วางรหัส -> คลิก "เรียกใช้"
  2. ตอนนี้มีช่องป้อนข้อมูลแจ้งขึ้น ป้อนที่อยู่โฟลเดอร์ในกล่องข้อความและอย่าลืมเพิ่ม“ \” ที่ท้ายสตริง
  3. คลิก“ ตกลง” เพื่อไปยังขั้นตอนถัดไปป้อนที่อยู่โฟลเดอร์ -> คลิก "ตกลง"
  4. ในช่องที่สอง ให้ป้อนตัวเลขลงในช่องข้อความ ตัวเลขนี้แสดงจำนวนหน้าทั้งหมดของเอกสารเป้าหมาย จากนั้นคลิก “ตกลง” อีกครั้งป้อนตัวเลขในกล่องข้อความ -> คลิก "ตกลง"

จะมีเอกสารเปิดอยู่ในโปรแกรม Word โดยมีชื่อเต็มของเอกสารเป้าหมายระบุอยู่บนเอกสารนั้น

จัดการกับ Plight of Word Collapse

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

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

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

แบ่งปันเลย:

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