Comment convertir toutes les images liées en images incorporées dans un document Word ?
Lorsque vous envoyez un document Word contenant des images liées à d'autres personnes, les images risquent de manquer et seront affichées sur l'ordinateur du destinataire comme le montre la capture d'écran ci-dessous. Comment convertir toutes les images liées en images incorporées en une seule fois avant de les envoyer ? Cet article propose une méthode VBA pour y parvenir.
Convertir les images liées en images incorporées avec un code VBA
Convertir les images liées en images incorporées avec un code VBA
Veuillez appliquer le code VBA ci-dessous pour convertir toutes les images liées dans un document en images incorporées.
1. Ouvrez le Document Word contenant les images liées que vous souhaitez convertir en images incorporées. Appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre Microsoft Visual Basic for Applications, cliquez sur Insérer > Module. Ensuite, copiez le code VBA ci-dessous dans la fenêtre Module. Voir la capture d'écran :
Code VBA : Convertir toutes les images liées en images incorporées en une seule fois
Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
Dim xIShape As InlineShape
For Each xIShape In ActiveDocument.InlineShapes
With xIShape
If .Type = wdInlineShapeLinkedPicture Then
.LinkFormat.SavePictureWithDocument = True
.LinkFormat.BreakLink
End If
End With
Next
End Sub
3. Appuyez sur la touche F5 pour exécuter le code.
Toutes les images liées dans le document actuel sont alors converties en images incorporées simultanément.
Meilleurs outils de productivité pour Office
Kutools pour Word – Optimisez votre expérience Word avec plus de 100 fonctionnalités remarquables !
🤖 Fonctionnalités de Kutools IA : Assistant IA / Assistant en Temps Réel / Super Polish (préserver le format) / Super Traduire (préserver le format) / Rédaction IA / Correction AI...
📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Exporter une solution dans différents formats (PDF/TXT/DOC/HTML...) / Conversion en lot vers PDF...
✏ Modification du texte : Recherche et remplacement en lot sur plusieurs fichiers / Redimensionner toutes les images / Transposer le tableau lignes et Colonnes / Convertir le tableau en texte...
🧹 Nettoyage sans effort : Éliminez les espaces supplémentaires / Sauts de section / Zone de texte / Liens hypertexte / Pour plus d’outils de suppression, rendez-vous dans le groupe Supprimer...
➕ Insertion créative : Insérer des séparateurs de milliers / Case à cocher / Bouton radio / Code QR / Code-barres / Plusieurs images / Découvrez davantage dans le groupe Insérer...
🔍 Sélection précise : Ciblez des pages spécifiques / Tableaux / Forme / Paragraphe de titre / Améliorez la navigation avec plus de fonctions de Sélectionner...
⭐ Optimisations exclusives : Accéder à n’importe quelle plage / Insérer automatiquement du texte répétitif / Basculer entre les fenêtres du document /11 outils de conversion...
🌍 Prend en charge plus de40 langues : Utilisez Kutools dans la langue de votre choix – Prise en charge de l’Anglais, de l’Espagnol, de l’Allemand, du Français, du Chinois et de bien d’autres encore !

✨ Kutools pour Office – Une installation, cinq outils puissants !
Inclus Office Tab Pro · Kutools pour Excel · Kutools pour Outlook · Kutools pour Word · Kutools pour PowerPoint
📦 Obtenez les5 outils dans une seule suite | 🔗 Intégration transparente avec Microsoft Office | ⚡ Gagnez du temps et augmentez votre productivité instantanément
Meilleurs outils de productivité pour Office
Kutools pour Word – 100+ outils pour Word
- 🤖 Fonctionnalités de Kutools IA : Assistant IA / Assistant en Temps Réel / Super Polish / Super Traduire / Rédaction IA / Correction AI
- 📘 Maîtrise des documents : Diviser les pages / Fusionner les documents / Conversion en lot vers PDF
- ✏ Modification du texte : Recherche et remplacement en lot / Redimensionner toutes les images
- 🧹 Nettoyage sans effort : Supprimer les espaces supplémentaires / Supprimer les sauts de section
- ➕ Insertion créative : Insérer des séparateurs de milliers / Insérer des cases à cocher / Créer des codes QR
- 🌍 Prend en charge plus de40 langues : Kutools parle votre langue – plus de40 langues prises en charge !