Bilder in einem Bereich Löschen

Computer: Software & Programmierung Office Software
1

Hallo zusammen,

ich möchte gerne in Excel im Bereich D5:I20 alle Bilder, die sich darin befinden, löschen. Alle Bilder drum herum sollen vom Löschen verschont bleiben.

Kennt jemand von Euch einen Code dafür?

Im Voraus vielen Dank für Eure Hilfe! :smile:

Viele Grüße

Christian

2

ich möchte gerne in Excel im Bereich D5:I20 alle Bilder, die
sich darin befinden, löschen. Alle Bilder drum herum sollen
vom Löschen verschont bleiben.

Hi Christian,

ungetestet, wenn’s nicht klappt meld dich nochmal:

Sub tt()
Dim S
For Each S In ActiveSheet.Shapes
 If Not Intersect(S.TopLeftCell, Range("D5:I20")) Is Nothing Then S.Delete
Next S
End Sub

Gruß
Reinhard

3

Hallo Reinhard,

genauso habe ich mir das vorgestellt, absolute Spitze!!!

Vielen Dank für deine schnelle Hilfe, bist der Beste!

Gruß
Christian