verknüfte Grafik per VBA löschen
29.03.2015 12:36:41
Springer
ich kopiere über einen Button eine verknüfte Grafik immer an die gleiche Stelle.
Da der Name der Grafikname Picture 17 sich Hochzählt, bekomme ich diese per VBA nicht wieder gelöscht.
Kann mir bitte jemand helfen?
Gruß
Reinhardt
Sub Verknüpftes_Bild()
Range("AT7:BY10").Select
Selection.Copy
Range("A18").Select
ActiveSheet.Pictures.Paste.Select
ActiveSheet.Shapes.Range(Array("Picture 17")).Select
Range("G16").Select
End Sub
Sub Verknüpftes_Bild_Loeschen()
ActiveSheet.Shapes.Range(Array("Picture 17")).Select
Selection.Delete
Range("G16").Select
End Sub