Comment vérifier si une cellule contient une image dans Excel?
Il est facile de trouver et de sélectionner toutes les images dans une feuille de calcul active dans Excel. Mais savez-vous comment vérifier si une cellule contient une image dans Excel? Une méthode de cet article peut vous aider.
Vérifiez si une cellule contient une image avec le code VBA
Vérifiez si une cellule contient une image avec le code VBA
Le code VBA ci-dessous peut vous aider à vérifier si une cellule contient une image. Veuillez faire comme suit.
1. Ouvrez la feuille de calcul dont vous avez besoin pour vérifier si l'image existe dans une cellule spécifiée, puis appuyez sur le bouton autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Ensuite, copiez et collez le code VBA dans la fenêtre Code.
Code VBA: vérifier si une cellule contient une image dans Excel
Sub CellHasPicture()
Dim xRg As Range
Dim xShape As Shape
Dim xFlag As Boolean
On Error Resume Next
Set xRg = Application.InputBox("Please enter the cell address:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
xFlag = False
For Each xShape In ActiveSheet.Shapes
If xShape.TopLeftCell.Address = xRg.Address Then
xFlag = True
End If
Next
If xFlag Then
MsgBox "Image exists!"
Else
MsgBox "Image does not exist"
End If
End Sub
3. appuie sur le F5 clé pour exécuter le code. Dans le popping Kutools for Excel boîte de dialogue, veuillez entrer la cellule dont vous souhaitez vérifier si elle contient une image, puis cliquez sur le OK bouton. Voir la capture d'écran:
4. Ensuite, une boîte de dialogue apparaîtra comme ci-dessous la capture d'écran montrée si une image existe ou non dans la cellule spécifiée.
Articles connexes:
- Comment changer automatiquement toutes les images pour les déplacer et les dimensionner avec des cellules dans Excel?
- Comment centrer une image dans une cellule Excel?
- Comment insérer une image ou une image dynamiquement dans une cellule en fonction de la valeur de la cellule dans Excel?
- Comment agrandir l'image en cliquant dessus dans Excel?
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!