Comment transformer toutes les images liées en images incorporées dans un document Word ?
Lorsque vous envoyez à d’autres personnes un document Word contenant des images liées, celles-ci seront manquantes et s’afficheront sur l’ordinateur du destinataire comme illustré dans la capture d’écran ci-dessous. Comment convertir d’un seul coup toutes les images liées en images incorporées avant de l’envoyer ? Cet article propose une méthode VBA pour résoudre ce problème.
Convertir les images liées en images incorporées à l’aide d’un code VBA
Convertir les images liées en images incorporées à l’aide d’un code VBA
Veuillez appliquer le code VBA ci-dessous pour transformer toutes les images liées d’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 pour Applications.
2. Dans la fenêtre Microsoft Visual Basic pour Applications, cliquez sur Insertion > Module. Copiez ensuite 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 Sub3. Appuyez sur la touche F5 pour exécuter le code.
Toutes les images liées dans le document actuel sont alors converties simultanément en images incorporées.
Meilleurs outils de productivité Office
Kutools pour Word – Améliorez votre expérience Word avec plus de 100 fonctionnalités remarquables !
🤖Fonctionnalités Kutools IA : Assistant IA / Assistant en Temps Réel / Super Polish (conserver le format) / Super Traduire (conserver le format) / Rédaction IA / Correction IA…
📘Maîtrisez vos documents : divisez les pages, fusionnez les documents, exportez la sélection dans divers formats (PDF, TXT, DOC, HTML…) ou convertissez-les par lots en PDF…
✏Édition du contenu : Recherche et remplacement en lot dans plusieurs fichiers / Redimensionner toutes les images / Transposer les lignes et colonnes d’un tableau / Convertir un tableau en texte…
🧹Nettoyage simplifié : supprimez en un clin d’œil les espaces superflus, les sauts de section, les zones de texte ou les liens hypertexte. Pour encore plus d’outils de suppression, rendez-vous dans le groupe Supprimer…
➕Insertions créatives : insérez des séparateurs de milliers, une case à cocher, un bouton radio, un code QR, un code-barres ou plusieurs images. Découvrez-en davantage dans le groupe Insertion…
🔍Sélections précises : ciblez exactement les pages spécifiques, les tableaux, les formes ou les paragraphes de titre. Améliorez votre navigation grâce à davantage de fonctions de dé sélection…
⭐Améliorations phares : Naviguer vers n’importe quel emplacement / Insérer automatiquement du texte répétitif / Basculer entre les documents Windows / 11 outils de conversion Outils de...
🌍Prend en charge plus de 40 langues : Utilisez Kutools dans votre langue préférée – disponible en anglais, espagnol, allemand, français, chinois et plus de 40 autres langues !
Office Tab- Apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
✨ Kutools for Office – Une installation, cinq outils puissants !
Inclus Office Tab Pro·Kutools pour Excel·Kutools pour Outlook·Kutools pour Word·Kutools for PowerPoint
📦 Obtenez les 5 outils dans une seule suite | 🔗 Intégration transparente avec Microsoft Office | ⚡ Gagner du temps et boostez immédiatement votre productivité
Meilleurs outils de productivité Office
Kutools pour Word- Outils 100+ pour Word
- 🤖Kutools IA Fonctionnalités: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 par lots en PDF
- ✏Édition du contenu:Recherche et remplacement en lot/Redimensionner toutes les images
- 🧹Nettoyage simplifié:Supprimer les espaces superflus/Supprimer Saut de section
- ➕Insertions créatives:Insérer des séparateurs de milliers/Insérer Case à cocher/Créer Code QR
- 🌍Prend en charge plus de 40 langues : Kutools parle votre langue – plus de 40 langues disponibles !