Shape / Picture
20.04.2023 23:37:39
Siegfried
Hallo Zusammen
ich habe in ein Tabellenblatt Daten aus dem Internet per Kopie eingefügt.
Diese enthält mehrere Hyperlinks und mehrere Zeichnungsobjekte, also unterschiedliche Formen.
Einige dieser Zeichnungsobjekte möchte ich entfernen.
Wenn ich in einer For Each Schleife die Namen der Elemente abfrage, bekomme ich Picture1 bis Picture137
For Each shp In Worksheets("Tabelle1").Shapes
If shp.Type = msoPicture Then
Debug.Print shp.Name
End If
Next shp
Wie kann ich die unterschiedlichen Typen ermitteln. Die Zeichnungsobjekte, die ich entfernen möchte, befinden sich alle in einer Spalte.
Gruß
Siegfried
