Wie lösche ich alle Bilder in einer Reihe von Zellen?

Wenn Ihr Arbeitsblatt mehrere Bilder enthält, möchten Sie jetzt einige davon in einem bestimmten Bereich löschen. Wie gehen Sie schnell damit um?

Löschen Sie alle Bilder in einem bestimmten Zellbereich mit VBA-Code

Löschen Sie mit Kutools for Excel alle Bilder in einem Arbeitsblatt oder einer ganzen Arbeitsmappe

---

Löschen Sie alle Bilder in einem bestimmten Zellbereich mit VBA-Code

Hier ist ein einfacher VBA-Code, mit dem Sie die Bilder im ausgewählten Bereich löschen können, ohne sie einzeln zu löschen. Gehen Sie dazu wie folgt vor:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie Insert > Modul, und fügen Sie den folgenden Code in das ein Modul Fenster.

VBA-Code: Löschen Sie alle Bilder in einem ausgewählten Zellbereich:

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

Hinweis: Im obigen Code, A5: B8 Ist der Bereich, aus dem Sie die Bilder löschen möchten, ändern Sie ihn bitte nach Ihren Wünschen.

3. Dann drücken F5 Taste zum Ausführen dieses Codes, und die Bilder im ausgewählten Bereich wurden sofort gelöscht, siehe Screenshot:

---

Löschen Sie mit Kutools for Excel alle Bilder in einem Arbeitsblatt oder einer ganzen Arbeitsmappe

Wenn Sie alle Bilder aus einem Arbeitsblatt oder einer Arbeitsmappe löschen müssen, wird die Kutools für Excel 's Illustrationen & Objekte löschen Dienstprogramm kann Ihnen einen Gefallen tun.

Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen.

Gehe zu Download Kostenlose Testversion 30 TageKaufen Sie PayPal / MyCommerce

Nach der Installation Kutools for ExcelBitte gehen Sie wie folgt vor:

1. Klicken Sie Kutoolen > Löschen > Illustrationen & Objekte löschen, siehe Screenshot:

2. In dem Illustrationen & Objekte löschen Dialogfeld überprüfen Fotos von dem Löschen Wählen Sie dann den Bereich aus, aus dem Sie die Bilder löschen möchten hinein sehen Abschnitt, siehe Screenshot:

3. Dann klick Ok Klicken Sie auf die Schaltfläche, und alle Bilder werden wie ausgewählt aus dem Arbeitsblatt oder der gesamten Arbeitsmappe gelöscht.

Klicken Sie hier, um Kutools für Excel herunterzuladen und jetzt kostenlos zu testen!