resim silme

[kakara]

merhaba ustadlarım excel dosyasında mevcut olan jpg uzantılı veya png uzantılı tum resımlerı nasıl sılebılırım. bır cozumu var mıdır ?

 

[EmrExcel16]

Merhaba , inceleyiniz..

Tüm Sayfalardaki Resimleri Sil

Merhaba Arkadaşlar, Dosyadaki tüm sayfalardaki resimleri, şekilleri, düğmeleri silen bir kod olur mu ! aşağıdaki kod ile sayfadali silinebiliyor. Tek kodda tüm sayfalarda uygulamak mümkün mü ! Sub Resim_Sil() With ActiveWorkbook For Each myshape In ActiveSheet.Shapes...

www.excel.web.tr

 

[kakara]

@Korhan Ayhan ustadımın eskıden paylastıgı bır kod ısımı gördü tesekkur ederım


Sub RESIM_SIL()
Dim RESIM As Shape

For Each RESIM In ActiveSheet.Shapes
If InStr(1, RESIM.Name, "Picture") > 0 Then RESIM.Delete
Next

MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub