3 วิธีด่วนในการเพิ่มเส้นขอบให้กับรูปภาพในเอกสาร Word ของคุณ

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

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

วิธีที่ 1: เพิ่มเส้นขอบให้กับรูปภาพหนึ่งภาพในเอกสารเดียว

1. ขั้นแรกให้คลิกที่รูปภาพเพื่อเลือก
2. จากนั้นคลิกแท็บ "รูปแบบ" ใต้ "เครื่องมือรูปภาพ"
3. จากนั้นคลิก“ เส้นขอบรูปภาพ” และเลือกสี   

วิธีที่ 2: เพิ่มเส้นขอบให้กับรูปภาพทั้งหมดในเอกสารเดียว

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

1. เริ่มต้นด้วยการคลิกแท็บ “นักพัฒนา” จากนั้นเลือก “Visual Basic” เพื่อแสดงตัวแก้ไข VBA หากไม่พบแท็บ “นักพัฒนา” ให้กด “Alt+F11” แทน
2. จากนั้นคลิก "ปกติ"
3. จากนั้นคลิกแท็บ "แทรก" แล้วเลือก "โมดูล" ในเมนู
4. ดับเบิลคลิกที่โมดูลใหม่เพื่อเปิดพื้นที่การเข้ารหัสทางด้านขวา
5. ตอนนี้วางมาโครการร้องที่นั่น:

Sub AddPictureBorders()
  Dim objShape As Shape
  Dim objInLineShape As InlineShape
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objInLineShape In .InlineShapes
      With objInLineShape.Line
        .Style = msoLineSingle
        .ForeColor.RGB = RGB(0, 0, 0)
      End With
    Next
    For Each objShape In .Shapes
      objShape.Fill.Solid
      With objShape.Line
        .Style = msoLineSingle
        .ForeColor.RGB = RGB(0, 0, 0)
      End With
    Next
  End With
End Sub

6. สุดท้าย แต่ไม่ท้ายสุดให้คลิกปุ่ม“ วิ่ง” หรือกด“ F5”

วิธีที่ 3: เพิ่มเส้นขอบให้กับรูปภาพทั้งหมดในเอกสารหลายชุด

เนื่องจากเราสามารถเขียนมาโครเพื่อจัดการกับรูปภาพในเอกสารได้จึงมีวิธีการประมวลผลรูปภาพในเอกสารหลายชุดเช่นกัน

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

Sub AddPictureBordersInMultiDoc()
  Dim objShape As Shape
  Dim objInLineShape As InlineShape
  Dim objDoc As Document
  Dim strFile As String
  Dim strFolder As String
 
  Set objDoc = ActiveDocument
  strFolder = "C:\Users\Public\Documents\New folder\"
  strFile = Dir(strFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & strFile)
    With objDoc
      For Each objInLineShape In .InlineShapes
        With objInLineShape.Line
          .Style = msoLineSingle
          .ForeColor.RGB = RGB(0, 0, 0)
        End With
      Next
      For Each objShape In .Shapes
        objShape.Fill.Solid
        With objShape.Line
          .Style = msoLineSingle
          .ForeColor.RGB = RGB(0, 0, 0)
        End With
      Next
    End With
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

หมายเหตุ : :

1. "C: \ Users \ Public \ Documents \ New โฟลเดอร์ \” ในมาโครนี้หมายถึงเส้นทางไดเร็กทอรีที่คุณจัดเก็บเอกสาร และอย่าลืมใส่คำสุดท้าย“\"
2. คุณสามารถเปลี่ยนสีเส้นขอบได้โดยการแก้ไขไฟล์ ค่า RGB.

ถึงเวลาคิดถึงการสำรองข้อมูล

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

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

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