Comment supprimer toutes les images d'une plage de cellules?

Si plusieurs images sont remplies dans votre feuille de calcul, vous souhaitez maintenant en supprimer certaines dans une plage spécifiée, comment gérez-vous cela rapidement?

Supprimer toutes les images dans une plage spécifique de cellules avec le code VBA

Supprimez toutes les images d'une feuille de calcul ou d'un classeur entier avec Kutools for Excel

Supprimer toutes les images dans une plage spécifique de cellules avec le code VBA

Voici un simple code VBA qui peut vous aider à supprimer les images de la plage sélectionnée sans les supprimer une par une, procédez comme suit:

1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2Cliquez sur insérer > Module, et collez le code suivant dans le Module Fenêtre.

Code VBA: supprimez toutes les images dans une plage de cellules sélectionnée:

Sub DeletePic()
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("A5:B8")
    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

Notes: Dans le code ci-dessus, A5: B8 est la plage dont vous souhaitez supprimer les images, veuillez la modifier selon vos besoins.

3. Puis appuyez F5 clé pour exécuter ce code, et les images de la plage sélectionnée ont été supprimées à la fois, voir capture d'écran:

Supprimez toutes les images d'une feuille de calcul ou d'un classeur entier avec Kutools for Excel

Si vous devez supprimer toutes les images d'une feuille de calcul ou d'un classeur, le Kutools pour Excel's Supprimer des illustrations et des objets l'utilité peut vous rendre service.

Après l'installation de Kutools for Excel, procédez comme suit:

1Cliquez sur Kutools > Supprimer > Supprimer des illustrations et des objets, voir capture d'écran:

2. Dans le Supprimer des illustrations et des objets boîte de dialogue, cochez Photos du Supprimer section, puis choisissez la portée dont vous souhaitez supprimer les images sous le regarder dans section, voir capture d'écran:

3. Puis clique Ok et toutes les images seront supprimées de la feuille de calcul ou du classeur entier comme vous l'avez sélectionné.

Cliquez pour télécharger Kutools for Excel et un essai gratuit maintenant !