Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Shape suchen und Zeile löschen

Shape suchen und Zeile löschen
Gregor
Hallo zusammen
Kann ich die Suche von "AcitveSheet.Shapes" auch einschränken, zB auf Spalte A? Die Zeile, in der ein Shape steht soll inkl. des Shape gelöscht werden. Ich habe folgenden Ansatz gefunden:
Sub x()
Dim sh As Shape
For Each sh In ActiveSheet.Shapes
sh.Delete
Next
End Sub
Danke
Gregor
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Shape suchen und Zeile löschen
16.02.2010 08:56:56
Tino
Hallo,
versuche es mal so.
Dim oSha As Shape
For Each oSha In ActiveSheet.Shapes
If oSha.TopLeftCell.Column = 1 Then
oSha.TopLeftCell.EntireRow.Delete
oSha.Delete
End If
Next
Gruß Tino
AW: Shape suchen und Zeile löschen
16.02.2010 09:12:20
Gregor
Hoi Tino
Vielen Dank, klappt super.
Freundliche Grüsse
Gregor
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige