ไปยังเนื้อหาหลัก

จะลบรูปภาพทั้งหมดออกจากเอกสารใน Word ได้อย่างไร?

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

ลบรูปภาพทั้งหมดออกจากเอกสารโดยใช้ฟังก์ชัน Find and Replace
ลบรูปภาพทั้งหมดออกจากเอกสารโดยใช้รหัส VBA
ลบรูปภาพทั้งหมดออกจากเอกสารได้อย่างง่ายดายด้วย Kutools for Word


ลบรูปภาพทั้งหมดออกจากเอกสารโดยใช้ฟังก์ชัน Find and Replace

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

ขั้นตอนที่ 1: คลิก หน้าแรก > แทนที่ เพื่อเปิด ค้นหาและแทนที่ หน้าต่าง;

ขั้นตอนที่ 2: ในไฟล์ ค้นหาและแทนที่ คลิกหน้าต่าง More ปุ่มเพื่อแสดงเพิ่มเติม ค้นหา ตัวเลือกแล้วคลิก พิเศษ > กราฟฟิคแล้วคลิกไฟล์ แทนที่ทั้งหมด ปุ่ม. ดูภาพหน้าจอ:

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

ตอนนี้รูปภาพทั้งหมดในเอกสารปัจจุบันจะถูกลบออกทันทีตามภาพด้านล่างที่แสดง


ลบรูปภาพทั้งหมดออกจากเอกสารได้อย่างง่ายดายด้วย Kutools for Word:

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


ลบรูปภาพทั้งหมดออกจากเอกสารโดยใช้รหัส VBA

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

ขั้นตอนที่ 1: กดปุ่ม อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง;

ขั้นตอนที่ 2: คลิก สิ่งที่ใส่เข้าไป > โมดูลคัดลอกและวางรหัส VBA ต่อไปนี้ลงในไฟล์ โมดูล หน้าต่าง;

ขั้นตอนที่ 3: คลิกปุ่ม วิ่ง เพื่อใช้ VBA

รหัส VBA: ลบรูปภาพทั้งหมดจากเอกสาร:

Sub DitchPictures()
Dim objPic As InlineShape
For Each objPic In ActiveDocument.InlineShapes
objPic.Delete
Next objPic
End Sub

ตอนนี้รูปภาพทั้งหมดในเอกสารปัจจุบันจะถูกลบออกทันทีตามภาพด้านล่างที่แสดง


ลบรูปภาพทั้งหมดออกจากเอกสารด้วย Kutools for Word

Kutools สำหรับ Word เป็นวิธีที่สะดวกที่สุดในการลบรูปภาพทั้งหมดออกจากเอกสาร สามารถลบรูปภาพทั้งหมดออกจากเอกสารทั้งหมดหรือรูปภาพทั้งหมดจากส่วนที่เลือกของเอกสาร

Kutools สำหรับ Word : ด้วยโปรแกรมเสริม Word ที่มีประโยชน์มากกว่า 100 รายการ ทดลองใช้ฟรีไม่มีข้อจำกัดใน 60 วัน.

ลบภาพออกจากช่วง:

1. โปรดเลือกช่วงที่มีรูปภาพที่คุณต้องการลบจากนั้นใช้ยูทิลิตี้นี้โดยคลิก Kutools > More > ลบรูปภาพ เพื่อลบออกพร้อมกัน ดูภาพหน้าจอ:

ลบรูปภาพออกจากเอกสารทั้งหมด:

1. เพียงเปิดใช้งานยูทิลิตี้โดยคลิก Kutools > More > ลบรูปภาพ โดยไม่ต้องเลือกส่วนใดส่วนหนึ่งของเอกสาร จากนั้นก Kutools สำหรับ Word กล่องโต้ตอบจะปรากฏขึ้นเพื่อเตือนให้คุณลบรูปภาพทั้งหมด คลิก ใช่ เพื่อเริ่มการลบ

ตอนนี้รูปภาพทั้งหมดในเอกสารปัจจุบันจะถูกลบออกทันทีตามภาพด้านล่างที่แสดง

หากคุณต้องการทดลองใช้ยูทิลิตีนี้ฟรีโปรดไปที่ ดาวน์โหลดซอฟต์แวร์ฟรี ก่อนแล้วไปใช้การดำเนินการตามขั้นตอนข้างต้น


สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

Kutools สำหรับ Word - ยกระดับประสบการณ์คำศัพท์ของคุณด้วย Over 100 คุณสมบัติเด่น!

เจาะลึกคุณสมบัติเด่นด้านล่างหรือ คลิกที่นี่เพื่อสำรวจพลังทั้งหมดของ Kutools for Word.

📘 ความเชี่ยวชาญด้านเอกสาร: แยกหน้า  /  ผสานเอกสาร  /  ส่งออกตัวเลือกในรูปแบบต่างๆ (PDF/TXT/DOC/XLSX)  /  แบทช์แปลงเป็น PDF  /  ส่งออกเพจเป็นรูปภาพ  /  พิมพ์หลายไฟล์พร้อมกัน ...

การแก้ไขเนื้อหา: ค้นหาแบทช์และแทนที่ ข้ามหลายไฟล์   /  ปรับขนาดรูปภาพทั้งหมด   /  ย้ายแถวและคอลัมน์ของตาราง  /  แปลงตารางเป็นข้อความ ...

🧹 ทำความสะอาดได้อย่างง่ายดายกวาดออกไป พื้นที่พิเศษ  /  แบ่งส่วน  /   ส่วนหัวทั้งหมด  /  กล่องข้อความ  /  เชื่อมโยงหลายมิติ  /  หากต้องการทราบเครื่องมือในการถอดเพิ่มเติม โปรดไปที่ Remove Group ของเรา

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

🔍 การเลือกที่แม่นยำ: ระบุหน้าเฉพาะ  /  ตาราง  /  รูปร่าง  /  หัวเรื่องย่อหน้า  /  นำทางอย่างง่ายดายโดยใช้กลุ่มที่เลือกของเรา

การปรับปรุงดาว: นำทางอย่างรวดเร็วไปยังสถานที่ใด ๆ  /  แทรกข้อความซ้ำอัตโนมัติ  /  สลับระหว่างหน้าต่างเอกสารได้อย่างราบรื่น  /  11 เครื่องมือการแปลง ...

แปลงงาน Word ของคุณด้วย Kutools 👉 ดาวน์โหลดพร้อมทดลองใช้ 30 วันทันที 🚀.

 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Great reminder about the find & replace>special>graphics option!

Saved me so much work!
This comment was minimized by the moderator on the site
i dont know but some of the graphic is not capturing in replace button.
This comment was minimized by the moderator on the site
Wow, yes thank you. Several other previous matches did not work.
This comment was minimized by the moderator on the site
Thank you so much for this how to - it saved me HOURS of work taking photos out of a document!! nancy
This comment was minimized by the moderator on the site
Your code will only remove inlineshapes, consider the following as I have sometimes seen problems when using collections Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes(1).Delete Loop I use these when changing a file to text only. I also convert all tables to tab delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop I have not seen any problems with do while loops, but have occasionally when deleting from a collection that I am playing with I alternatively use .count to get a total of items and use a for next with a step -1 to work on them backwards. By the way, I work on a Mac and objects sometimes act funny and some windows VBA objects are not even available.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations