3 วิธีในการแบทช์ลบสีเติมของหลายรูปร่างในเอกสาร Word ของคุณ

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

ในบทความนี้ เรายินดีที่จะแสดงวิธีการที่มีประสิทธิภาพ 3 วิธีในการลบสีเติมของรูปทรงหลายๆ รูปในเอกสาร Word ของคุณพร้อมกัน

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

คราวนี้เราต้องการแสดงวิธีการลบสีเติมของรูปร่างหลาย ๆ รูปแบบในเอกสาร ดังนั้นคุณสามารถเติมสีที่ต้องการหรือเพียงแค่ปล่อยรูปร่างไว้ในพื้นหลังที่ว่างเปล่า ต่อไปนี้เป็น 3 วิธีที่สามารถช่วยคุณได้ในกรณีต่างๆBatch ลบสีเติมของรูปทรงหลายรูปแบบในเอกสาร Word ของคุณ

วิธีที่ 1: ลบการเติมสีของหลายรูปร่างบนหน้า

  1. ก่อนอื่นคลิกแท็บ "หน้าแรก" ใน Ribbon
  2. จากนั้นคลิกคำสั่ง“ เลือก” ในกลุ่ม“ การแก้ไข”
  3. ในเมนูแบบเลื่อนลงเลือก“ บานหน้าต่างการเลือก”คลิก "หน้าแรก" -> คลิก "เลือก" -> คลิก "บานหน้าต่างการเลือก"
  4. ตอนนี้ในบานหน้าต่าง“ การเลือกและการมองเห็น” คุณจะเห็นชื่อของรูปร่างทั้งหมดในหน้านี้ กด“ Ctrl” เพื่อเลือกรูปร่างที่คุณต้องการ
  5. จากนั้นคลิก“ รูปแบบ” ใน Ribbon
  6. จากนั้นคลิก“ Shape Fill”
  7. เลือก "ไม่เติม" ในเมนูแบบเลื่อนลงเลือก Shapes-> คลิก "Format" -> คลิก "Shape Fill" -> เลือก "No Fill"

วิธีที่ 2: แบทช์ลบสีเติมของรูปร่างทั้งหมดในเอกสาร

  1. อันดับแรก หากแท็บ “นักพัฒนา” ปรากฏอยู่ ให้คลิกที่แท็บนั้น จากนั้นคลิก “Visual Basic” เพื่อเปิดตัวแก้ไข VBA หากแท็บ “นักพัฒนา” ยังไม่ได้เปิดใช้งาน ให้กด “Alt+F11” แทน
  2. ตอนนี้ในตัวแก้ไขคลิกโครงการ "ปกติ" ทางด้านซ้าย
  3. จากนั้นคลิก“ แทรก” บนแถบเมนู
  4. จากนั้นเลือก“ โมดูล” ในเมนูแบบเลื่อนลงคลิก "Normal" -> คลิก "Insert" -> คลิก "Module"
  5. ดับเบิลคลิกที่โมดูลใหม่เพื่อเปิดและวางรหัสเหล่านี้ที่นั่น:
Sub RemoveAllShapeFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    objShape.Fill.Visible = False
    objShape.Line.Visible = msoTrue
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub
  1. สุดท้ายคลิกปุ่ม“ Run” หรือกด“ F5” เพื่อรันโค้ดวางมาโคร -> คลิก "เรียกใช้"

วิธีที่ 3: ลบสีเติมของกล่องข้อความทั้งหมดในเอกสาร

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

  1. ประการแรกทำซ้ำขั้นตอนในวิธีที่ 2 เพื่อติดตั้งและเรียกใช้แมโคร
  2. คราวนี้แทนที่มาโครนั้นด้วยอันนี้:
Sub RemoveTextBoxFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Fill.Visible = msoFalse
      objShape.Line.Visible = msoTrue
    Else
      Exit For
    End If
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

นี่คือผลลัพธ์:ลบสีเติมของกล่องข้อความทั้งหมด

กู้คืนเอกสารที่เสียหายอย่างรวดเร็ว

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

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

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

แบ่งปันเลย:

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