KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment exporter toutes les images d’un seul coup depuis Excel ?

AuteurXiaoyang Date de modification

Imaginez que vous ayez de nombreuses images dans votre classeur et que vous souhaitiez les enregistrer toutes d’un seul coup dans un dossier spécifique. La méthode classique consiste à les copier-coller une par une, mais elle est extrêmement chronophage. Découvrez donc quelques astuces pour accomplir cette tâche rapidement et efficacement.


Exporter toutes les images d’un coup depuis Excel à l’aide de la fonction Enregistrer sous

Grâce à la fonction intégrée d’Excel Enregistrer sous, vous pouvez enregistrer un classeur au format Page Web afin de sauvegarder toutes les images — y compris les graphiques, les formes et autres objets — dans un dossier. Voici la marche à suivre.

1. Ouvrez le classeur contenant les images que vous souhaitez enregistrer. Cliquez sur Fichier > Enregistrer sous > Parcourir.

Cliquez sur Fichier > Enregistrer sous > Parcourir

2. Dans la boîte de dialogue Enregistrer sous, procédez comme suit :

2,1) Choisissez un dossier dans lequel enregistrer le fichier Exporter les images ;
2,2) Sélectionnez Page Webdans la liste déroulante Spécifier le format d'enregistrement Liste déroulante ;
2,3) Cliquez sur le bouton Enregistrer.

spécifiez les options dans la boîte de dialogue Enregistrer sous

3. Dans la boîte de dialogue Microsoft Excel qui s’ouvre, cliquez sur le bouton Oui.

cliquez sur le bouton Oui

4. Ouvrez le dossier où les fichiers exportés ont été enregistrés : vous y trouverez un dossier ainsi qu’un fichier intitulé « Liste des fichiers au format HTML ». Toutes les images du classeur, y compris les graphiques, les formes et autres objets, sont enregistrées dans ce dossier.

Toutes les images du classeur, y compris les graphiques, formes ou objets, sont enregistrées dans le dossier

5. Conservez dans ce dossier uniquement les images dont vous avez besoin et supprimez les autres.


Exportez facilement toutes les images d’un coup depuis Excel grâce à un outil remarquable

La méthode ci-dessus extrait tous les objets du classeur, y compris certains que vous ne souhaitez peut-être pas conserver. Si vous avez installé Kutools pour Excel dans Excel, sa fonctionnalité Exporter le graphique vous permettra d’enregistrer uniquement les images nécessaires.

Kutools pour Excelpropose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, stimulant ainsi créativité et efficacité.Intégré aux capacités de l’IA, Kutools automatise les tâches avec précision, rendant la gestion des données parfaitement fluide.Informations détaillées sur Kutools pour Excel...         Essai gratuit...

1. Cliquez sur KUTOOLS PLUS > Importer/Exporter > Exporter le graphique :

cliquez sur la fonction Exporter les graphiques de Kutools

2. Dans la boîte de dialogue Exporter le graphique, configurez les options comme suit :

2,1) Sélectionnez Imagesdans la liste déroulante Types;
Conseils :Par défaut, tous les éléments graphiques, y compris les graphiques, les images et les formes présents dans Classeur actuel, sont listés.
2,2) Dans la section Répertoire de sauvegarde, cliquez sur le bouton bouton Parcourirpour Sélectionner un dossier et enregistrer vos images exportées ;
2,3) Dans le champ Format d'exportationListe déroulante, choisissez le format d’image souhaité pour l’exportation ;
2,4) Cliquez sur OK.

spécifiez les options dans la boîte de dialogue

3. Une boîte de dialogue s’affiche alors pour vous indiquer combien d’images ont été exportées avec succès. Cliquez sur le bouton OK.

une boîte de dialogue s’ouvre pour indiquer combien d’images ont été exportées

Vous pouvez désormais accéder au dossier de destination et consulter le fichier Exporter les images.

Cliquez sur Exporter le graphique pour en savoir plus sur cette fonctionnalité.

Avant d’appliquer Kutools pour Excel, veuillez d’abord le télécharger et l’installer.


Exporter les images et renommez-les automatiquement à l’aide des valeurs des cellules adjacentes

Comme illustré dans la capture d’écran ci-dessous, deux colonnes sont présentes : l’une contient une liste de noms de fruits et l’autre les images correspondantes. Pour exporter ces images et les renommer automatiquement avec les noms de fruits associés, vous pouvez utiliser le code VBA présenté dans cette section.

Exporter les images et les renommer avec les valeurs des cellules adjacentes

1. Dans la feuille de calcul contenant les images à exporter, 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 suivant dans la fenêtre du module.

Code VBA : exporter les images d’une colonne et les renommer automatiquement

Sub ExportImages_ExtendOffice()
'Updated by Extendoffice 20220308
    Dim xStrPath As String
    Dim xStrImgName As String
    Dim xImg As Shape
    Dim xObjChar As ChartObject
    Dim xFD As FileDialog
    Set xFD = Application.FileDialog(msoFileDialogFolderPicker)
    xFD.Title = "Please select a folder to save the pictures" & " - ExtendOffice"
    If xFD.Show = -1 Then
       xStrPath = xFD.SelectedItems.Item(1) & "\"
    Else
        Exit Sub
    End If
    
    On Error Resume Next
    For Each xImg In ActiveSheet.Shapes
        If xImg.TopLeftCell.Column = 2 Then
        xStrImgName = xImg.TopLeftCell.Offset(0, -1).Value
        If xStrImgName <> "" Then
            xImg.Select
            
            Selection.Copy
            Set xObjChar = ActiveSheet.ChartObjects.Add(0, 0, xImg.Width, xImg.Height)
            With xObjChar
                .Border.LineStyle = xlLineStyleNone
                .Activate
                ActiveChart.Paste
                .Chart.Export xStrPath & xStrImgName & ".png"
                .Delete
            End With
        End If
        End If
    Next
End Sub

copiez et collez le code dans le module

Remarques :

1) Le numéro 2figurant dans la ligne «If xImg.TopLeftCell.Column = 2 Then» correspond au numéro de la colonne à partir de laquelle vous souhaitez exporter les images ;
2) Le chiffre -1présent dans la ligne «xStrImgName = xImg.TopLeftCell.Offset(0, -1).Value» indique que les images seront nommées à l’aide des valeurs des La cellule à gauche adjacentes.

3. Appuyez sur la touche F5 pour exécuter le code. Dans la fenêtre qui s’ouvre, sélectionnez un dossier pour enregistrer les images, puis cliquez sur OK.

sélectionnez un dossier pour enregistrer les images

Toutes les images de la colonne spécifiée sont alors automatiquement exportées et renommées à l’aide des valeurs des cellules adjacentes, conformément à la définition.

toutes les images d’une colonne spécifiée sont exportées et automatiquement nommées avec les valeurs des cellules adjacentes


Article associé :

Comment exporter des graphiques au format image dans Excel ?

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


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 !

Tous les compléments Kutools. Un seul installateur

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels