3 méthodes rapides pour ajouter des bordures aux images de votre document Word

Dans cet article, nous aimerions discuter de 3 méthodes rapides pour ajouter des bordures aux images dans vos documents Word.

Pourquoi appliquerions-nous des bordures aux images ? La réponse est évidente. Certaines images ressemblent trop au contenu principal, disons un plan d'un bloc de mots, que nous pourrions facilement confondre avec des textes. Par conséquent, pour faire ressortir les images, le contenu du texte profite de l'utilité des 3 méthodes suivantes que nous allons vous montrer.

Méthode 1 : Ajouter des bordures à une image dans un document

1. Tout d'abord, cliquez sur une image pour la sélectionner.
2. Cliquez ensuite sur l'onglet "Format" sous "Picture Tool".
3. Cliquez ensuite sur "Bordure de l'image" et choisissez une couleur.   

Méthode 2 : ajouter des bordures à toutes les images d'un document

Comme le montre la méthode 1, modifier manuellement l'image une par une n'est vraiment pas une bonne idée. Pour économiser des efforts, la macro est la voie à suivre.

1. Pour commencer, cliquez sur l'onglet « Développeur », puis sur « Visual Basic » pour afficher l'éditeur VBA. Si l'onglet « Développeur » n'est pas disponible, appuyez simplement sur « Alt + F11 ».
2. Cliquez ensuite sur "Normale".
3. Cliquez ensuite sur l'onglet "Insérer" et choisissez "Module" dans son menu.
4. Double-cliquez sur le nouveau module pour ouvrir la zone de codage sur le côté droit.
5. Collez maintenant la macro ci-dessous :

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. Enfin, cliquez sur le bouton "Exécuter" ou appuyez sur "F5".

Méthode 3 : Ajouter des bordures à toutes les images dans plusieurs documents

Puisque nous pouvons écrire une macro pour traiter les images dans un document, il existe également un moyen de traiter les images dans plusieurs documents.

Avant toute chose, vous devez organiser tous les documents cibles dans le même répertoire. Ensuite, suivez exactement les mêmes étapes que celles décrites ci-dessus pour installer et exécuter une macro, mais remplacez-la par la suivante :

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

Remarques:

1. L'événement C:\Utilisateurs\Public\Documents\Nouveau dossier\" dans cette macro fait référence au chemin du répertoire où vous stockez les documents. Et n'oubliez jamais d'ajouter le dernier "\ ».
2. Vous pouvez changer la couleur de la bordure en modifiant le Valeur RVB.

Il est temps de penser à la sauvegarde

La plupart d'entre nous savent à quel point une sauvegarde peut être utile. Elle peut vous sauver la mise dans les moments difficiles. Dégâts de mots. Ainsi, nous ne saperons jamais l'effet de prendre des minutes pour sauvegarder des documents précieux. A ce titre, on ne peut garantir la sécurité de ses données.

Introduction de l'auteur:

Vera Chen est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris endommagé xlsx et pdf réparer les produits logiciels. Pour plus d'informations, visitez www.datanumen.com