Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1848to1852
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

mehrere Shapes löschen

mehrere Shapes löschen
12.10.2021 15:26:42
Michael
Hallo zusammen,
ich möchte ermitteln, welche Textbox vorhanden ist und die vorhandene sollte gelöscht werden.
So geht es leider nicht:
If ActiveSheet.Shapes.Range(Array("A")) Or Array("B") Or Array("C") Then
Selection.Delete
End If
Ich habe die Textboxen umbenannt in A,B und C
mfg Michael

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

Betreff
Datum
Anwender
Anzeige
AW: mehrere Shapes löschen
12.10.2021 15:33:14
Rudi
das musst du mit einer Schleife machen, falls nicht unbedingt alle existieren.
Gruß
Rudi
AW: mehrere Shapes löschen
12.10.2021 15:38:28
Michael
Hallo Rudi,
danke für die Info.
Hab allerdings keine Ahnung von der Schleife...
Ein kleines Beispiel ?
mfg Michael
AW: mehrere Shapes löschen
12.10.2021 15:44:27
Rudi

Sub test()
Dim SHP As Shape
For Each SHP In ActiveSheet.Shapes
Select Case SHP.Name
Case "A", "B", "C": SHP.Delete
End Select
Next SHP
End Sub

Danke Rudi perfekt !!! -)
12.10.2021 16:04:28
Michael
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige