Images Excel : insérer, redimensionner, enregistrer, supprimer plusieurs images ou illustrations dans Excel

Pour la plupart d’entre nous, il est facile d’insérer une image stockée sur l’ordinateur dans une feuille de calcul. Voici comment procéder :

1. Dans la feuille de calcul, cliquez à l’endroit où vous souhaitez insérer une image.

2. Cliquez ensuite sur Insertion > Images > Cet appareil, voir la capture d’écran :

3. Dans la fenêtre Insérer une image qui s’ouvre, accédez au dossier contenant les images, puis maintenez la touche Ctrl enfoncée pour sélectionner les images à insérer. Voir capture d’écran :

4. Cliquez ensuite sur le bouton Insérer. Les images sélectionnées sont alors insérées dans la feuille. Vous pouvez désormais les ajuster ou les redimensionner selon les cellules souhaitées — voir capture d’écran :

Si vous utilisez Excel 2013 ou une version ultérieure, insérez facilement des images directement depuis le web ou OneDrive en suivant ces étapes :

1. Dans la feuille de calcul, cliquez à l’endroit où vous souhaitez insérer une image.

2. Cliquez ensuite sur Insertion > Images > Images en ligne, voir la capture d’écran :

3. Une fenêtre s’affiche. Dans la section Images en ligne, saisissez votre recherche dans la zone de texte, puis appuyez sur la touche Entrée. Toutes les images correspondantes s’affichent immédiatement — voir capture d’écran :

4. Sélectionnez ensuite les images souhaitées, puis cliquez sur le bouton Insérer. Une fois insérées, redimensionnez-les ou ajustez-les à la position souhaitée.

Le code VBA suivant vous permet d’insérer plusieurs images dans des cellules en ajustant automatiquement leur taille. Voici la marche à suivre :

1. Ajustez la taille des cellules destinées à recevoir l’image, puis sélectionnez-les.

2. Maintenez ensuite les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Insérer plusieurs images en fonction de la taille des cellules

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Appuyez ensuite sur la touche F5 pour exécuter ce code. Dans la fenêtre Ouvrir, sélectionnez le dossier contenant les images, choisissez celles que vous souhaitez insérer, puis cliquez sur le bouton Ouvrir. Toutes les images sélectionnées sont insérées dans votre plage de cellules en conservant leurs dimensions d’origine. Voir la capture d’écran :

Si vous ne maîtrisez pas le code VBA, vous pouvez utiliser une fonctionnalité puissante : Importer des images de Kutools pour Excel. Grâce à cette fonctionnalité pratique, importez rapidement et facilement plusieurs images directement dans vos cellules.

1. Cliquez sur KUTOOLS PLUS > Importer/Exporter > Importer des images, voir la capture d’écran :

2. Dans la boîte de dialogue Importer des images qui s’ouvre, effectuez les opérations suivantes :

• Spécifiez l’ordre des images à partir de la liste déroulante Ordre d'importation ; vous pouvez choisir Remplir par colonne, puis par ligneou Remplir par ligne, puis par colonne;
• Cliquez ensuite sur le bouton Ajouterpour sélectionner le Fichiers d'image ou le dossier dans lequel ajouter les images à l’Liste d'images;
• Cliquez sur le bouton Taille d'importation, puis, dans la boîte de dialogue Taille d’image à importer, sélectionnez l’option Taille de la cellule correspondante.
• 

3. Une fois les paramètres terminés, cliquez sur le bouton Importer. Une autre fenêtre Importer des images s’ouvre alors ; indiquez les cellules de destination dans lesquelles vous souhaitez importer les images (voir capture d’écran) :

4. Cliquez ensuite sur le bouton OK. Toutes les images sélectionnées ont été insérées en ajustant automatiquement leur taille à celle des cellules spécifiques, comme illustré ci-dessous :

Le code VBA ci-dessous vous permet d’insérer rapidement plusieurs images en les associant automatiquement à leurs noms. Voici la marche à suivre :

1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Insérer plusieurs images en les associant à leurs noms

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Remarque : dans le code ci-dessus, vous pouvez ajuster la hauteur et la largeur des images selon vos besoins dans les lignes de script «.ShapeRange.Height = 60» et «.ShapeRange.Width = 60».

3. Ensuite, appuyez sur la touche F5 pour exécuter ce code. Dans la fenêtre qui s’ouvre, veuillez sélectionner le dossier contenant les images que vous souhaitez insérer (voir capture d’écran) :

4. Cliquez ensuite sur le bouton OK. Une boîte de dialogue s’affiche alors ; veuillez sélectionner les cellules contenant le nom de l’image (voir capture d’écran) :

5. Cliquez sur le bouton OK pour continuer. Une autre boîte de dialogue s’affiche : veuillez sélectionner les cellules dans lesquelles vous souhaitez insérer les images (voir la capture d’écran) :

6. Enfin, cliquez sur OK : les images sont insérées dans les cellules en fonction de leurs noms en une seule opération (voir capture d’écran) :

Si vous disposez de Kutools pour Excel, sa fonctionnalité Associer l‹importation d›images vous permet d’insérer facilement et rapidement les images en fonction de leur nom.

1. Cliquez sur KUTOOLS PLUS > Importer/Exporter > Associer l‹importation d›images (voir capture d’écran) :

2. Dans la boîte de dialogue Importer une image correspondante qui s’ouvre, effectuez les opérations suivantes :

• Spécifiez l’ordre des images à partir de la liste déroulante Ordre d'importation ; vous pouvez choisir Remplir par colonne, puis par ligneou Remplir par ligne, puis par colonne;
• Ensuite, dans la zone de texte Plage de correspondance, sélectionnez les noms d’image sur lesquels vous souhaitez Insérer une image ;
• Cliquez ensuite sur le bouton Ajouterpour sélectionner le Fichiers d'image ou le dossier dans lequel ajouter les images à l’Liste d'images;
• Ensuite, vous devez définir la taille des images. Cliquez sur le bouton Taille d'importation, puis, dans la boîte de dialogue Taille d’image à importer, sélectionnez la taille souhaitée.
• 

3. Une fois les paramètres définis, cliquez sur le bouton Importer. Dans la boîte de dialogue Associer l‹importation d›images qui s’affiche (voir capture d’écran), sélectionnez une cellule ou une plage de cellules pour indiquer l’emplacement des images :

4. Cliquez ensuite sur OK : toutes les images dont les noms correspondent aux valeurs des cellules sont alors insérées (voir capture d’écran) :

Appliquez le code VBA suivant pour insérer des images à partir d’une liste d’URL.

1. Commencez par ajuster la taille des cellules adjacentes où vous souhaitez insérer les images.

2. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Insérer des images à partir d’une liste d’URL

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Remarques : Dans le code ci-dessus, la plage A2:A5 correspond aux cellules contenant les adresses URL à partir desquelles extraire les images. Adaptez ces références de cellules selon vos besoins.

4. Appuyez ensuite sur la touche F5 pour exécuter ce code. Les images correspondantes sont extraites des URL et insérées dans la colonne adjacente, centrées dans les cellules (voir capture d’écran) :

Kutools pour Excel propose une fonctionnalité remarquable : Insérer des images à partir d’un chemin (URL). Grâce à cet outil, les images correspondantes sont extraites rapidement et facilement depuis leurs URL.

1. Cliquez sur Kutools > Insertion > Insérer des images à partir du chemin d’accès (URL) (voir capture d’écran) :

2. Dans la boîte de dialogue Insérer des images à partir du chemin d’accès (URL) qui s’ouvre, configurez les options suivantes :

• Sélectionnez la liste des cellules contenant des URL ainsi qu’une plage de cellules où vous souhaitez insérer les images ;
• Indiquez la taille souhaitée pour les images dans la section Taille de l’image.
• 

3. Cliquez ensuite sur le bouton Ok, et toutes les images seront extraites à partir des URL (voir la capture d’écran) :

Vous pouvez utiliser le code VBA suivant pour insérer des images en fonction de leur chemin de fichier.

1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre Module.

Code VBA : Insérer une image à partir d’une plage de Chemin du fichier

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Après avoir inséré le code ci-dessus, appuyez sur la touche F5 pour l’exécuter. Une boîte de dialogue s’affiche alors ; veuillez sélectionner les cellules du chemin du fichier (voir capture d’écran) :

4. Cliquez ensuite sur le bouton OK. Toutes les images basées sur le chemin du fichier s’affichent dans la colonne suivante, comme illustré dans la capture d’écran ci-dessous :

Kutools pour Excel propose également la fonctionnalité Insérer des images à partir du chemin d’accès (URL), qui vous permet d’afficher les images correspondantes à partir de leur chemin de fichier.

1. Cliquez sur Kutools > Insertion > Insérer des images à partir du chemin d'accès (URL). Dans la boîte de dialogue qui s’ouvre, spécifiez la plage contenant les chemins des fichiers, la plage de destination pour les images et la taille des images selon vos besoins (voir captures d’écran) :

2. Une fois les options définies, cliquez sur le bouton Ok : vos images seront insérées en une seule opération dans les cellules sélectionnées (voir la capture d’écran ci-dessous) :

Conseils : Il arrive parfois que l’image chevauche la zone de données de la feuille de calcul, comme le montre la capture d’écran ci-dessous. Cela se produit lorsque l’image est trop grande et qu’elle n’est pas redimensionnée automatiquement pour s’ajuster à la zone d’en-tête ou de pied de page.

Pour résoudre ce problème, il vous suffit de redimensionner l’image dans l’en-tête ou le pied de page. Procédez comme suit :

1. Cliquez dans la section d’en-tête ou de pied de page contenant l’image, puis cliquez sur Format de l’image sous l’onglet Conception (voir capture d’écran) :

2. Dans la boîte de dialogue Format de l’image, sous l’onglet Taille, ajustez la taille de l’image pour qu’elle s’adapte parfaitement à la zone d’en-tête ou de pied de page (voir la capture d’écran) :

3. Cliquez ensuite sur OK pour obtenir le résultat souhaité.

1. Ouvrez la feuille de calcul dans laquelle vous souhaitez insérer une image d’arrière-plan.

2. Ensuite, cliquez sur Mise en page > Arrière-plan. Voir la capture d’écran :

3. Dans la fenêtre Insérer des images qui s’ouvre, choisissez une image depuis votre ordinateur, un site web ou OneDrive selon vos besoins. Voir la capture d’écran :

4. L’image a désormais été insérée dans la feuille de calcul en tant qu’arrière-plan, comme illustré ci-dessous :

Avec la méthode ci-dessus, vous ne pouvez pas modifier la transparence de l’image d’arrière-plan insérée. Ainsi, si la couleur de l’image d’arrière-plan est trop intense, cela rendra la lecture des données de la feuille de calcul difficile. Dans cette section, je vais expliquer comment insérer une image transparente derrière les cellules.

1. Cliquez sur Insertion > Formes, puis sélectionnez une forme rectangulaire (voir la capture d’écran) :

2. Ensuite, dessinez une forme de la taille souhaitée sur la feuille active.

3. Après avoir dessiné la forme, l’onglet Outils de dessin s’affiche dans le Ruban. Cliquez ensuite sur Format > Contour de la forme > Aucun contour. Voir la capture d’écran :

4. Ensuite, cliquez avec le bouton droit sur la forme et choisissez Format de la forme dans le menu contextuel (voir la capture d’écran) :

5. Dans le volet Format de la forme qui s’affiche, sous l’onglet Remplissage et trait, effectuez les opérations suivantes :

• Dans la section Remplissage, sélectionnez l’option Image ou texture de remplissage;
• Cliquez sur le bouton Insérerdans la section Source de l’image, puis choisissez l’image que vous souhaitez insérer ;
• Ensuite, ajustez la transparence de l’image selon vos besoins dans la section Transparence.
• 

6. Vous verrez alors le formulaire rempli avec l’image, qui apparaît en arrière-plan, comme illustré dans la capture d’écran ci-dessus.

Remarque : une fois ce type d’image d’arrière-plan inséré, vous ne pourrez plus saisir de texte dans la zone qu’elle recouvre.

Les deux méthodes ci-dessus présentent chacune leurs limites : la première ne permet pas de modifier la transparence de l’image, tandis que la seconde empêche la saisie de texte dans les cellules situées à l’intérieur de la zone couverte par l’image. Pour résoudre ces problèmes, la fonctionnalité Insérer un filigrane de Kutools pour Excel peut vous être utile.

1. Cliquez sur Kutools > Insertion > Insérer un filigrane, voir la capture d’écran :

2. Dans la boîte de dialogue Insérer un filigrane qui s’ouvre, sélectionnez Filigrane image, puis cliquez sur le bouton Sélectionner une image pour choisir l’image à insérer. Définissez ensuite son échelle et cochez l’option « Estomper ». Voir la capture d’écran :

3. Ensuite, cliquez sur le bouton OK : l’image sera insérée dans la feuille de calcul en tant qu’arrière-plan.

Dans Excel, vous pouvez utiliser la fonction Copier en tant qu’image pour copier et insérer une plage de cellules sous forme d’image.

1. Sélectionnez la plage de cellules que vous souhaitez copier et coller sous forme d’image.

2. Ensuite, cliquez sur Accueil > Copier > Copier en tant qu’image. Voir la capture d’écran :

3. Dans la boîte de dialogue Copier l’image qui s’ouvre, sélectionnez Image dans la section Format. Voir la capture d’écran :

4. Ensuite, cliquez sur le bouton OK, puis appuyez simplement sur Ctrl + V pour coller l’image n’importe où dans le classeur.

Dans Excel, il existe un outil appelé Appareil photo qui vous permet de prendre une « photo » de votre sélection de données et de la coller sous forme d’image. Lorsque les données d’origine changent, l’image copiée est mise à jour automatiquement.

Tout d’abord, vous devez afficher l’outil Appareil photo dans le ruban, puis l’utiliser.

1. Cliquez sur l’icône Personnaliser la barre d’outils Accès rapide, puis sélectionnez l’option Autres commandes. Voir la capture d’écran :

2. Dans la boîte de dialogue Options Excel qui s’ouvre, procédez comme suit :

• Sélectionnez Toutes les commandesdans la liste déroulante Choisir les commandes à partir de;
• Faites ensuite défiler la liste pour sélectionner Appareil photodans la zone de liste ;
• Cliquez ensuite sur le bouton Ajouterpour ajouter cet outil à la Barre d’outils Accès rapide personnalisée;
• Enfin, cliquez sur OK pour fermer cette boîte de dialogue.
• 

3. L’outil Appareil photo est désormais affiché dans le Ruban. Voir la capture d’écran :

4. Sélectionnez ensuite la plage de cellules dont vous souhaitez capturer une image.

5. Ensuite, cliquez sur l’outil Appareil photo, puis rendez-vous sur la feuille de calcul et cliquez n’importe où : la plage de données sera insérée sous forme d’image, comme illustré dans la démonstration ci-dessous :

Si vous disposez de Kutools pour Excel, sa fonctionnalité Bibliothèque de ressources vous permet d’enregistrer la sélection de données dans la Bibliothèque de ressources, puis de la réutiliser ultérieurement sous forme d’image ou de texte, selon vos besoins.

1. Sélectionnez la plage de données que vous souhaitez insérer sous forme d’image.

2. Ensuite, cliquez sur Kutools > Navigation. Voir la capture d’écran :

3. Dans le volet Navigation qui s’affiche, cliquez sur l’icône Bibliothèque de ressources, puis sur l’icône Ajouter le contenu sélectionné à l'AutoTexte. Voir la capture d’écran :

4. Dans la boîte de dialogue Ajouter à l’AutoTexte, attribuez un nom à cet élément, puis sélectionnez le groupe auquel vous souhaitez l’ajouter. Voir la capture d’écran :

5. Ensuite, cliquez sur le bouton Ajouter pour l’ajouter au volet Bibliothèque de ressources. Si vous souhaitez insérer cette plage sous forme d’image, cliquez simplement sur une cellule pour positionner l’image, puis retrouvez l’élément enregistré dans le volet Bibliothèque de ressources, et sélectionnez Insérer en tant que > Image (EMF) dans la liste déroulante associée à l’élément. La plage de données sera alors insérée dans la feuille sous forme d’image — voir les captures d’écran :

Généralement, dans Excel, vous pouvez créer une plage nommée dynamique, puis utiliser une image liée pour accomplir cette tâche.

1. Commencez par créer deux colonnes contenant les noms des produits et les images correspondantes (voir la capture d’écran) :

2. Ensuite, créez une liste déroulante pour les valeurs des cellules : cliquez sur une cellule pour afficher la liste déroulante, puis sélectionnez Données > Validation des données > Validation des données. Voir la capture d’écran :

3. Dans la boîte de dialogue Validation des données qui s’ouvre, sous l’onglet Paramètres, choisissez Liste dans la liste déroulante Autoriser, puis sélectionnez les cellules à partir desquelles vous souhaitez créer la liste déroulante dans la zone de texte Source. Voir capture d’écran :

4. Cliquez sur OK et la liste déroulante contenant les valeurs des cellules sera créée. Sélectionnez un élément dans cette liste, comme illustré ci-dessous :

5. Ensuite, cliquez sur Formules > Définir un nom, voir la capture d’écran :

6. Dans la boîte de dialogue Nouveau nom, effectuez les opérations suivantes :

• Saisissez le nom « myimage » dans la zone de texte Nom;
• Copiez ensuite et collez cette formule :=INDEX(Feuil11!$A$2:$B$6;EQUIV(Feuil11!$E$2;Feuil11!$A$2:$A$6;0);2)dans la zone de texte Fait référence à.

  

  Remarque: Dans la formule ci-dessus :

  • Sheet11!$A$2:$B$6: correspond à la feuille de calcul et à la plage contenant les valeurs et les images que vous souhaitez utiliser ;
  • Sheet11!$E$2: correspond à la cellule de la feuille dans laquelle vous avez créé la liste déroulante ;
  • Sheet11!$A$2:$A$6: correspond à la liste de cellules sur laquelle vous avez basé la liste déroulante ;
  • Le numéro de variable 2 correspond au numéro de la colonne contenant les images. Si vos images se trouvent dans la colonne C, saisissez 3.

7. Cliquez ensuite sur le bouton OK, puis copiez et collez l’image correspondant à la valeur de la cellule E2 depuis la plage d’origine vers la cellule F2 (voir capture d’écran) :

8. Ensuite, veuillez sélectionner l’image située dans la cellule F2, puis saisissez cette formule =myimage (myimage est le nom de la cellule que vous avez créé à l’étape 6) dans la barre de formule. Voir la capture d’écran :

9. Après avoir saisi la formule, appuyez sur la touche Entrée : désormais, dès que vous sélectionnez un élément dans la liste déroulante, son image associée s’affiche instantanément. Voir la capture d’écran :

La méthode ci-dessus peut s’avérer complexe pour la plupart d’entre nous. Découvrez donc une fonctionnalité pratique : la Liste déroulante avec image de Kutools pour Excel. Grâce à cet outil, créez en quelques clics plusieurs listes déroulantes accompagnées de leurs images respectives !

1. Commencez par créer deux colonnes dans votre feuille de calcul : l’une pour les noms des produits et l’autre pour les images associées.

2. Ensuite, cliquez sur Kutools > Liste déroulante > Liste déroulante avec image, voir la capture d’écran :

3. Dans la boîte de dialogue Liste déroulante avec image, si vous avez déjà créé les colonnes contenant les valeurs des cellules et les images, ignorez l’étape 1. Ensuite, sélectionnez la plage d’origine comprenant les données et les images, ainsi que la zone de placement de la liste (voir capture d’écran) :

4. Ensuite, cliquez sur le bouton Ok. Les listes déroulantes accompagnées d’images sont alors créées dans les cellules sélectionnées. Dès que vous choisissez un élément dans une cellule dotée d’une liste déroulante, son image correspondante s’affiche immédiatement — voir la démonstration ci-dessous :

Normalement, vous pouvez utiliser la fonctionnalité Enregistrer sous pour enregistrer toutes les images du classeur. Voici comment procéder :

1. Cliquez sur Fichier > Enregistrer sous. Dans la fenêtre Enregistrer sous, indiquez un dossier où enregistrer les fichiers exportés, puis sélectionnez Page Web (*.htm; *.html) dans la liste déroulante Type de fichier. Voir la capture d’écran :

2. Cliquez ensuite sur le bouton Enregistrer, puis rendez-vous dans le dossier spécifié. Vous y trouverez deux éléments : un fichier au format HTML et un dossier contenant les images, graphiques ou autres objets du classeur. Voir la capture d’écran :

3. Vous pouvez ensuite glisser uniquement les images vers un autre dossier, selon vos besoins.

Remarque : en utilisant cette fonctionnalité Enregistrer sous, vous obtenez deux versions de chaque image — une plus petite et une plus grande — vous permettant ainsi d’enregistrer les images en haute résolution selon vos besoins.

Pour enregistrer toutes les images d’un fichier Excel, vous pouvez également modifier l’extension du fichier en RAR. Procédez comme suit :

1. Modifiez l’extension du fichier xlsx en rar, comme illustré dans la capture d’écran ci-dessous :

2. Ensuite, décompressez le fichier. Vous verrez alors trois dossiers et un fichier dans le dossier — voir la capture d’écran :

3. Ensuite, ouvrez le dossier xl, puis le dossier media. Vous y trouverez toutes les images stockées, sans doublons — voir la capture d’écran :

Si vous disposez de Kutools pour Excel, sa fonctionnalité Exporter le graphique vous permet d’exporter rapidement des éléments spécifiques — comme des images, des graphiques ou des formes — au format image, selon vos besoins.

1. Cliquez sur KUTOOLS PLUS > Importer/Exporter > Exporter le graphique, voir la capture d’écran :

2. Dans la boîte de dialogue Exporter le graphique, effectuez les opérations suivantes :

• Choisissez l’option Imagesdans la liste déroulante Types;
• Spécifiez un dossier dans lequel enregistrer vos images exportées ;
• Cliquez ensuite sur la liste déroulante située dans Format d'exportation pour choisir un format pour vos images.
• 

3. Enfin, cliquez sur le bouton Ok : toutes les images contenues dans le classeur actuel ont été enregistrées dans le dossier que vous avez spécifié. Voir la capture d’écran :

Pour supprimer les images de Feuille de calcul actuelle, le code VBA ci-dessous peut vous aider. Procédez comme suit :

1. Activez la feuille de calcul contenant les images que vous souhaitez supprimer.

2. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Supprimer toutes les images de Feuille de calcul actuelle

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Ensuite, appuyez sur la touche F5 pour exécuter ce code. Toutes les images de la feuille active seront supprimées instantanément.

Si vous devez supprimer les images d’une plage de cellules uniquement, voici un autre code simple qui peut vous aider.

1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Supprimer les images d’une plage de cellules

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Remarque : Dans le code ci-dessus, B4:C6 est la plage à partir de laquelle vous souhaitez supprimer les images.

3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et toutes les images dans la plage sélectionnée seront supprimées d’un seul coup. Voir les captures d’écran :

Si vous disposez de Kutools pour Excel, sa fonctionnalité Supprimer les images et les objets vous permet de supprimer rapidement les images d’une feuille de calcul, de certaines feuilles sélectionnées ou de l’ensemble du classeur.

1. Cliquez sur Kutools > Supprimer > Supprimer les images et les objets. Voir la capture d’écran :

2. Dans la boîte de dialogue Supprimer les images et les objets qui s’ouvre, cochez l’option Images dans la section Supprimer, puis indiquez la portée à partir de laquelle vous souhaitez supprimer les images dans la section Rechercher dans. Voir la capture d’écran :

3. Cliquez ensuite sur le bouton OK, et toutes les images seront supprimées de la feuille de calcul, des feuilles sélectionnées ou du classeur entier, selon votre choix.