Funktioniert ganz gut nur:....
Wenn das Bild mit dem Namen "Logo" nicht existiert bricht er ab.
Möchte rausfinden ob das Shape ("Logo") existiert wenn ja dann soll die If schleife Durchlaufen werden werden.
If Sheets(i).Shapes("Logo").Top > 0 Then
ActiveSheet.Shapes("Logo").Select