Note: The other languages of the website are Google-translated. Back to English
English English

วิธีนับจำนวนภาพในเอกสาร Word?

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

นับจำนวนภาพอินไลน์ด้วยคุณสมบัติค้นหาและแทนที่

นับจำนวนทั้งภาพอินไลน์และรูปทรงลอยด้วยรหัส VBA


นับจำนวนภาพอินไลน์ด้วยคุณสมบัติค้นหาและแทนที่

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

1. คลิก หน้าแรก > หา > การค้นหาขั้นสูงดูภาพหน้าจอ:

doc นับภาพ 1

2. ใน ค้นหาและแทนที่ ภายใต้ หา พิมพ์ ^g เข้าไปใน สิ่งที่ค้นหา กล่องข้อความแล้วเลือก เอกสารหลัก จาก ค้นหาใน รายการแบบเลื่อนลงดูภาพหน้าจอ:

doc นับภาพ 2

3. จากนั้นคุณจะเห็นจำนวนภาพอินไลน์ในเอกสาร Word นี้แสดงเป็นภาพหน้าจอต่อไปนี้:

doc นับภาพ 3


นับจำนวนทั้งภาพอินไลน์และรูปทรงลอยด้วยรหัส VBA

วิธีการข้างต้นสามารถนับจำนวนภาพแบบอินไลน์ได้เท่านั้นหากมีรูปทรงลอยอยู่ในเอกสารจะไม่ถูกนับ รหัส VBA ต่อไปนี้สามารถช่วยคุณในการนับทั้งรูปภาพแบบอินไลน์และรูปทรงลอยได้โปรดทำดังนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูลคัดลอกและวางโค้ดด้านล่างลงในโมดูลว่างที่เปิดดูภาพหน้าจอ:

รหัส VBA: นับจำนวนภาพแบบอินไลน์และรูปทรงลอย:

Sub CountImagesInDoc()
    Dim xInlines As Long
    Dim xFloaters As Long
    Dim sh As Shape
    Dim tbxs As Long
    Dim msg As String
    With ActiveDocument
        For Each sh In .Shapes
            If sh.Type = msoTextBox Then tbxs = tbxs + 1
        Next
        xInlines = .InlineShapes.Count
        xFloaters = .Shapes.Count - tbxs
    End With
    xPrompt = "Inline images:" & vbTab & xInlines & vbCr
    xPrompt = xPrompt & "Floating shapes:" & vbTab & xFloaters & vbCr
    xPrompt = xPrompt & vbTab & "Total:" & vbTab & (xInlines + xFloaters) & vbCr
    xPrompt = xPrompt & "Counts do not include headers and footers, etc."
    MsgBox xPrompt, vbInformation, "Kutools for Word"
End Sub

3. หลังจากวางรหัสแล้วกด F5 กุญแจสำคัญในการเรียกใช้รหัสนี้และกล่องพร้อมต์จะปรากฏขึ้นเพื่อบอกจำนวนภาพในบรรทัดและรูปทรงลอยในเอกสาร Word นี้โปรดดูภาพหน้าจอ:

doc นับภาพ 4



เครื่องมือเพิ่มประสิทธิภาพคำแนะนำ

 

Kutools For Word - มากกว่า 100 คุณลักษณะขั้นสูงสำหรับ Word บันทึกของคุณ
50%
เวลา

  • การดำเนินการที่ซับซ้อนและซ้ำ ๆ สามารถดำเนินการครั้งเดียวในไม่กี่วินาที
  • แทรกภาพหลาย ๆ โฟลเดอร์ลงในเอกสาร Word พร้อมกัน
  • ผสานและรวมไฟล์ Word หลาย ๆ ไฟล์ในโฟลเดอร์เข้าด้วยกันตามลำดับที่คุณต้องการ
  • แยกเอกสารปัจจุบันออกเป็นเอกสารแยกตามหัวข้อตัวแบ่งส่วนหรือเกณฑ์อื่น ๆ
  • แปลงไฟล์ระหว่าง Doc และ Docx, Docx และ PDF ชุดเครื่องมือสำหรับการแปลงและการเลือกทั่วไปและอื่น ๆ ...
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (0)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL