Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1408to1412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Giorgi54

Giorgi54
24.02.2015 15:43:46
Gregor
Hallo
Ich möchte alle shapes, ausser dem Steuerelement aus einer Tabelle löschen. Mit
ActiveSheet.DrawingObjects.Delete
oder
ActiveSheet.Shapes.SelectAll
Selection.Delete
wird alles gelöscht.
Welche Möglichkeit gibt es?
Danke und Gruss
Gregor

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Giorgi54
24.02.2015 15:56:31
EtoPHG
Hallo Gregor
so?
Sub ShapesDelete()
Dim sh As Shape
For Each sh In ActiveSheet.Shapes
If Not (sh.Type = msoFormControl Or sh.Type = msoOLEControlObject) Then sh.Delete
Next sh
End Sub
Gruess Hansueli

Shape löschen
24.02.2015 16:07:37
Gregor
Hallo Hansueli
Ja genau, vielen Dank
Gruss Gregor

Shape löschen
24.02.2015 16:07:56
Gregor
Hallo Hansueli
Ja genau, vielen Dank
Gruss Gregor

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige