Comment supprimer toutes les images dans une plage de cellules ?
S'il y a plusieurs images insérées dans votre feuille de calcul et que vous souhaitez en supprimer certaines dans une plage spécifique, comment procéder rapidement ?
Supprimer toutes les images dans une plage de cellules spécifique avec du code VBA
Supprimer toutes les images d'une feuille de calcul ou d'un classeur entier avec Kutools pour Excel
Supprimer toutes les images dans une plage de cellules spécifique avec du code VBA
Voici un code VBA simple qui peut vous aider à supprimer les images dans la plage sélectionnée sans avoir à les supprimer une par une. Veuillez suivre ces étapes :
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre du module.
Code VBA : Supprimer 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
Remarque : Dans le code ci-dessus, A5:B8 est la plage où vous souhaitez supprimer les images. Veuillez la modifier selon vos besoins.
3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et les images dans la plage sélectionnée seront immédiatement supprimées, voir capture d'écran :
Supprimer toutes les images d'une feuille de calcul ou d'un classeur entier avec Kutools pour Excel
Si vous devez supprimer toutes les images d'une feuille de calcul ou d'un classeur, l'utilitaire Supprimer illustrations et objets de Kutools pour Excel peut vous aider.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Cliquez sur Kutools > Supprimer > Supprimer illustrations et objets, voir capture d'écran :
2. Dans la boîte de dialogue Supprimer illustrations et objets, cochez Images dans la section Supprimer, puis choisissez la portée depuis laquelle vous souhaitez supprimer les images sous la section Rechercher dans, voir capture d'écran :
3. Cliquez ensuite sur le bouton OK, et toutes les images seront supprimées de la feuille de calcul ou du classeur entier selon votre sélection.
Kutools pour Excel - Regorge de plus de 300 outils essentiels pour Excel. Profitez de fonctionnalités IA définitivement gratuites ! Téléchargez dès maintenant !
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels