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.
| Kutools for Excel : avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation en 30 jours. |
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 !
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la 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 facilite grandement votre travail
- Activer 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 réduit des centaines de clics de souris chaque jour!
