Hoe controleer ik of een cel een afbeelding bevat in Excel?
Het is gemakkelijk om alle afbeeldingen in een actief werkblad in Excel te vinden en te selecteren. Maar weet u hoe u in Excel kunt controleren of een cel een afbeelding bevat? Een methode in dit artikel kan je daarbij helpen.
Controleer of een cel een afbeelding met VBA-code bevat
Controleer of een cel een afbeelding met VBA-code bevat
De onderstaande VBA-code kan u helpen controleren of een cel een afbeelding bevat. Ga als volgt te werk.
1. Open het werkblad dat u nodig hebt om te controleren of de afbeelding in een opgegeven cel bestaat, en druk vervolgens op anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer en plak vervolgens VBA-code in het codevenster.
VBA-code: controleer of een cel een afbeelding bevat in 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. druk de F5 sleutel om de code uit te voeren. Bij het opduiken Kutools for Excel dialoogvenster, voer de cel in waarvan u wilt controleren of deze een afbeelding bevat en klik vervolgens op de OK knop. Zie screenshot:
4. Vervolgens verschijnt er een dialoogvenster zoals hieronder afgebeeld, of er wel of niet een afbeelding in de opgegeven cel bestaat.
Gerelateerde artikelen:
- Hoe verander ik automatisch alle afbeeldingen om te verplaatsen en te vergroten met cellen in Excel?
- Hoe een afbeelding centreren in een Excel-cel?
- Hoe een afbeelding of afbeelding dynamisch in de cel invoegen op basis van de celwaarde in Excel?
- Hoe een afbeelding vergroten door erop te klikken in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!