Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1144to1148
1144to1148
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nur Bilder löschen

Forumthread: Nur Bilder löschen

Nur Bilder löschen
DirkR
Hallo Excelgemeinde,
ich versuche mich nun schon seit Stunden an einem Code aus dem Forum, komme aber nicht weiter und hoffe auf eure Hilfe.
Folgender Code aus dem Forum: 
Sub Bild1_löschen()
Dim shShape As Shapes
Dim inShape As Integer
If Sheets("DVD Cover").Shapes.Count > 0 Then
For inShape = 1 To Sheets("DVD Cover").Shapes.Count
With Sheets("DVD Cover").Shapes(inShape)
If .Top > Range("C3").Top And .Top  Range("C3").Left And .Left
Dieser Code löscht allerdings alle Objekte, auch die CommandButton in dem Bereich.
Ich möchte allerdings, dass nur die Bilder im Bereich gelöscht werden.
Gruß DirkR
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Nur Bilder löschen
22.03.2010 09:47:14
Renee
Hi Dirk,
Dann versuch's mal so: 
Sub PicDelete()
Dim shShape As Shape
For Each shShape In Sheets("DVD Cover").Shapes
If shShape.Type = msoPicture And _
shShape.Top > Range("C3").Top And shShape.Top  Range("C3").Left And shShape.Left

GreetZ Renée
Anzeige
AW: Nur Bilder löschen
22.03.2010 10:02:09
DirkR
Hallo Renée,
super das klappt perfekt.
Vielen Dank
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige