3 Metode rapide de a adăuga chenaruri la imaginile din documentul Word

În acest articol, am dori să discutăm 3 metode rapide de a adăuga chenare imaginilor din documentele Word.

De ce am aplica margini imaginilor? Răspunsul este evident. Unele imagini seamănă prea mult cu conținutul principal, să zicem o fotografie a unui bloc de cuvinte, pe care le-am putea confunda cu ușurință cu texte. Prin urmare, pentru a scoate imaginile în evidență, conținutul textului se folosește de utilitatea următoarelor 3 metode pe care vi le vom arăta.

Metoda 1: Adăugați margini la o imagine într-un document

1. În primul rând, faceți clic pe o imagine pentru a selecta.
2. Apoi faceți clic pe fila „Format” sub „Instrument pentru imagine”.
3. Apoi faceți clic pe „Chenar imagine” și alegeți o culoare.   

Metoda 2: Adăugați chenaruri la toate imaginile dintr-un document

După cum se arată în metoda 1, modificarea manuală a imaginii una câte una nu este chiar o idee grozavă. Pentru a economisi eforturi, macro este modalitatea pe care ar trebui să o luați.

1. Pentru început, faceți clic pe fila „Developer”, apoi pe „Visual Basic” pentru a afișa editorul VBA. Când „Developer” nu este disponibil, apăsați pur și simplu „Alt+ F11”.
2. Apoi faceți clic pe „Normal”.
3. Apoi faceți clic pe fila „Inserare” și alegeți „Modul” din meniul său.
4. Faceți dublu clic pe noul modul pentru a deschide zona de codare din partea dreaptă.
5. Acum lipiți macrocomanda de mai jos acolo:

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. Nu în ultimul rând, faceți clic pe butonul „Run” sau apăsați „F5”.

Metoda 3: Adăugați chenaruri la toate imaginile din mai multe documente

Deoarece putem scrie o macrocomandă pentru a trata imaginile dintr-un document, există o modalitate de a procesa imagini și în mai multe documente.

Înainte de toate, trebuie să organizați toate documentele țintă în același director. Apoi, urmați exact aceiași pași prezentați mai sus pentru a instala și rula o macrocomandă, dar înlocuiți-o cu următoarea:

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

notițe:

1. "C:\Utilizatori\Public\Documente\Doar nou\” în această macrocomandă se referă la calea directorului în care stocați documentele. Și nu uita niciodată să adaugi ultimul „\".
2. Puteți schimba culoarea chenarului modificând Valoarea RGB.

E timpul să te gândești la Backup

Cei mai mulți dintre noi suntem bine informați despre ce poate face o copie de rezervă. Poate fi salvarea vieții tale în momentele în care ai... Deteriorarea cuvintelor. Astfel, nu vom submina niciodată efectul luării de minute pentru a face copii de rezervă ale documentelor valoroase. Ca atare, nu se poate garanta siguranța datelor sale.

Introducerea autorului:

Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv xlsx deteriorat și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com