3 Mabilis na Paraan para Magdagdag ng Mga Hangganan sa Mga Larawan sa Iyong Word Document

Sa artikulong ito, nais naming talakayin ang 3 mabilis na paraan kung paano magdagdag ng mga hangganan sa mga larawan sa iyong Word Documents.

Bakit namin ilalapat ang mga hangganan sa mga larawan? Ang sagot ay halata. Ang ilang mga larawan ay masyadong katulad ng mga pangunahing nilalaman, sabihin ang isang shot ng isang bloke ng mga salita, na maaari nating madaling mapagkamalan bilang mga teksto. Samakatuwid, upang gawing kakaiba ang mga larawan, nagagamit ang mga nilalaman ng teksto sa pagiging kapaki-pakinabang ng sumusunod na 3 pamamaraan na ipapakita namin sa iyo.

Paraan 1: Magdagdag ng mga Border sa Isang Larawan sa Isang Dokumento

1. Una, mag-click sa isang larawan upang pumili.
2. Susunod na i-click ang tab na "Format" sa ilalim ng "Picture Tool".
3. Pagkatapos ay i-click ang "Picture Border" at pumili ng isang kulay.   

Paraan 2: Magdagdag ng mga Border sa Lahat ng Larawan sa isang Dokumento

Tulad ng ipinapakita sa paraan 1, ang manu-manong baguhin ang larawan nang paisa-isa ay talagang hindi magandang ideya. Upang makatipid ng mga pagsisikap, ang macro ang paraan na dapat mong gawin.

1. Para magsimula, i-click ang tab na “Developer” pagkatapos ay ang “Visual Basic” para ipakita ang VBA editor. Kapag hindi available ang “Developer”, pindutin lamang ang “Alt+ F11”.
2. Pagkatapos i-click ang "Normal".
3. Susunod na pag-click sa tab na "Ipasok" at piliin ang "Modyul" sa menu nito.
4. I-double click ang bagong module upang buksan ang coding area sa kanang bahagi.
5. Ngayon i-paste ang sumisingaw na macro doon:

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. Huling ngunit hindi pa huli, i-click ang pindutang "Run" o pindutin ang "F5".

Paraan 3: Magdagdag ng mga Border sa Lahat ng Larawan sa Maramihang Dokumento

Dahil maaari tayong magsulat ng isang macro upang makitungo sa mga larawan sa isang dokumento, may paraan din upang maproseso ang mga larawan sa maraming mga dokumento.

Bago ang lahat, kailangan mong ayusin ang lahat ng target na dokumento sa ilalim ng iisang direktoryo. Pagkatapos, sundin ang eksaktong parehong mga hakbang na ipinakita sa itaas upang i-install at patakbuhin ang isang macro, ngunit palitan ito ng sumusunod:

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

Mga Tala:

1. Ang "C:\Users\Public\Documents\New folder\” sa macro na ito ay tumutukoy sa path ng direktoryo kung saan ka nag-iimbak ng mga dokumento. At huwag kalimutang idagdag ang huling "\".
2. Maaari mong baguhin ang kulay ng hangganan sa pamamagitan ng pagbabago sa Halaga ng RGB.

Oras na para Mag-isip tungkol sa Backup

Karamihan sa atin ay may sapat na kaalaman tungkol sa kung ano ang magagawa ng isang backup. Maaari itong maging tagapagligtas ng iyong buhay sa mga oras ng pagkakaroon ng Pagkasira ng salita. Kaya, hindi namin kailanman sisirain ang epekto ng paglalaan ng mga minuto upang i-back up ang mahahalagang dokumento. Dahil dito, hindi magagarantiyahan ng isa ang kaligtasan ng kanyang data.

Panimula ng May-akda:

Si Vera Chen ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang nasira xlsx at pdf pagkumpuni ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa