Passer au contenu principal

Comment supprimer toutes les images du document dans Word?

Si vous souhaitez supprimer toutes les images et conserver la mise en forme inchangée dans un document, comment pouvez-vous faire? Ce didacticiel vous montrera quelques astuces pour supprimer toutes les images sans modifier la mise en forme du document.

Supprimer toutes les images du document par la fonction Rechercher et remplacer
Supprimer toutes les images du document à l'aide du code VBA
Supprimez facilement toutes les images du document avec Kutools for Word


Supprimer toutes les images du document par la fonction Rechercher et remplacer

Rechercher et remplacer La fonction fournit un moyen simple de convertir ou de supprimer des valeurs, vous pouvez donc également l'utiliser pour supprimer toutes les images du document.

Étape 1: cliquez sur Accueil > remplacer ouvrir le Rechercher et remplacer fenêtre;

Étape 2: dans le Rechercher et remplacer fenêtre, cliquez sur le Plus bouton pour en afficher plus Rechercher Options, puis cliquez sur # > Graphique, et enfin cliquez sur le Remplacer tout bouton. Voir la capture d'écran:

Notes: vous pouvez également entrer ^g into the Trouvez ce que boîte directement, gardez la boîte de remplacement vide, puis cliquez sur le Remplacer tout bouton pour supprimer toutes les images du document;

Maintenant, toutes les images des documents actuels sont supprimées immédiatement comme illustré ci-dessous.


Supprimez facilement toutes les images du document avec Kutools for Word :

Le Supprimer des images utilité de Kutools for Word peut vous aider à supprimer rapidement toutes les images d'une plage sélectionnée ou du document entier selon vos besoins. Voir l'opération comme ci-dessous la capture d'écran montrée. Téléchargez et essayez-le maintenant! (60-journée sentier libre)


Supprimer toutes les images du document à l'aide du code VBA

L'utilisation du code VBA est un autre moyen plus simple de supprimer toutes les images du document. Vous pouvez utiliser un code VBA comme suit pour supprimer toutes les images du document.

Étape 1: appuyez sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour Application fenêtre;

Étape 2: cliquez sur insérer > Module, copiez et collez le code VBA suivant dans le Module fenêtre;

Étape 3: cliquez sur le Courir bouton pour appliquer le VBA.

Code VBA: supprimer toutes les images du document:

Sub DitchPictures()
Dim objPic As InlineShape
For Each objPic In ActiveDocument.InlineShapes
objPic.Delete
Next objPic
End Sub

Maintenant, toutes les images des documents actuels sont supprimées immédiatement comme illustré ci-dessous.


Supprimez toutes les images du document avec Kutools for Word

Kutools for Word fournit le moyen le plus pratique de supprimer toutes les images du document. Il peut supprimer toutes les images du document entier ou toutes les images de la partie sélectionnée du document.

Kutools for Word : avec plus de 100 compléments Word pratiques, libre d'essayer sans limitation dans 60 jours.

Supprimer des images d'une plage:

1. Veuillez sélectionner la plage contenant les images que vous souhaitez supprimer, puis appliquez cet utilitaire en cliquant sur Kutools > Plus > Supprimer des images pour les supprimer immédiatement. Voir la capture d'écran:

Supprimer des images de l'ensemble du document:

1. Activez simplement l'utilitaire en cliquant sur Kutools > Plus > Supprimer des images sans sélectionner aucune partie du document. Puis un Kutools for Word La boîte de dialogue apparaît pour vous rappeler la suppression de toutes les images. Cliquez sur Oui pour commencer la suppression.

Maintenant, toutes les images des documents actuels sont supprimées immédiatement comme illustré ci-dessous.

Si vous souhaitez avoir un essai gratuit de cet utilitaire, rendez-vous sur télécharger gratuitement le logiciel d'abord, puis appliquez l'opération selon les étapes ci-dessus.


Meilleurs outils de productivité bureautique

Kutools for Word - Élevez votre expérience Word avec Over 100 Caractéristiques remarquables !

Plongez dans les fonctionnalités mises en évidence ci-dessous ou cliquez ici pour explorer toute la puissance de Kutools for Word.

(I.e. Maîtrise des documents: Pages divisées  /  Fusionner des documents  /  Exporter la sélection dans différents formats (PDF/TXT/DOC/XLSX)  /  Conversion par lots en PDF  /  Exporter des pages sous forme d'images  /  Imprimer plusieurs fichiers à la fois 

Édition du contenu: Rechercher et remplacer par lots sur plusieurs fichiers   /  Redimensionner toutes les images   /  Transposer les lignes et les colonnes du tableau  /  Convertir le tableau en texte 

🧹 Nettoyage sans effortBalayez Espaces supplémentaires  /  Sauts de section  /   Tous les en-têtes  /  Boîtes de texte  /  Liens hypertextes  /  Pour plus d'outils de suppression, rendez-vous sur notre groupe Supprimer

Insertions créatives: insérer Mille séparateurs  /  Cases à cocher  /  Boutons radio  /  code QR  /  Code barres  /  Tableau des lignes diagonales  /  Légende de l'équation  /  Légende  /  Légende de la table  /  Plusieurs images  /  Découvrez-en plus dans notre groupe d'insertion

🔍 Sélections de précision: Identifiez des pages spécifiques  /  les tables  /  formes  /  paragraphes de titre  /  Naviguez en toute simplicité grâce à notre groupe Select

Améliorations des étoiles: Naviguez rapidement vers n’importe quel endroit  /  insertion automatique de texte répétitif  /  basculer de manière transparente entre les fenêtres de document  /  11 outils de conversion 

Transformez vos tâches Word avec Kutools. 👉 Téléchargez avec un essai de 30 jours maintenant 🚀.

 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Great reminder about the find & replace>special>graphics option!

Saved me so much work!
This comment was minimized by the moderator on the site
i dont know but some of the graphic is not capturing in replace button.
This comment was minimized by the moderator on the site
Wow, yes thank you. Several other previous matches did not work.
This comment was minimized by the moderator on the site
Thank you so much for this how to - it saved me HOURS of work taking photos out of a document!! nancy
This comment was minimized by the moderator on the site
Your code will only remove inlineshapes, consider the following as I have sometimes seen problems when using collections Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes(1).Delete Loop I use these when changing a file to text only. I also convert all tables to tab delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop I have not seen any problems with do while loops, but have occasionally when deleting from a collection that I am playing with I alternatively use .count to get a total of items and use a for next with a step -1 to work on them backwards. By the way, I work on a Mac and objects sometimes act funny and some windows VBA objects are not even available.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations