Wie Man alle Bilder/ Objekte aus einer Excel-Arbeitsmappe Entfernt

Written by

Mel Jenkins

Reviewed by

Laura Tsitlidze

Translated by

Zakarya El Oirzadi

Last updated on Juli 9, 2022

In diesem Lernprogramm erfahren Sie, wie Sie alle Bilder in einem Excel-Arbeitsblatt auf einmal entfernen können.

Entfernen von Bildern mit Inhalt auswählen

1. Um alle Bilder in Ihrem Excel-Arbeitsblatt auszuwählen, wählen Sie in der Multifunktionsleiste Start > Suchen & Auswählen > Inhalte auswählen.

Bilder-Inhalteauswaehlen

2. Wählen Sie Objekte und klicken Sie dann auf OK.

Bilder Inhalteauswaehlen Objekte

Alle Objekte (Bilder) auf dem aktiven Arbeitsblatt werden ausgewählt.

Pictures GoToSpecial SelectAll

3. Drücken Sie Löschen.

Bilder mit VBA entfernen

Wir können auch alle Bilder mit einer VBA-Schleife löschen.

Sub DeletePictures()
   Dim oPic As Shape
   Dim wb As Workbook
   Dim ws As Worksheet
   'Schleife durch alle Arbeitsblätter
   For Each ws In ActiveWorkbook.Worksheets
   'Schleife durch alle Objekte im ausgewählten Arbeitsblatt
      For Each oPic In ws.Shapes
      'Objekt löschen
         oPic.Delete
      Next oPic
   Next ws
End Sub

1. Drücken Sie in Excel ALT + F11 auf der Tastatur, um zum VBE (Visual Basic Editor) zu wechseln.

2. Wählen Sie im Menü Einfügen > Modul.

Bilder VBA Module

3. Geben Sie den obigen Code in das Modulfenster ein.

Bilder VBA Code

4. Vergewissern Sie sich, dass Sie innerhalb Ihrer Unterprozedur geklickt haben, und klicken Sie dann auf Ausführen oder drücken Sie F5 auf der Tastatur, um den Code auszuführen.

Bilder VBA ausfuehren Code