Resmin üzerine tıklanınca silinsin

Muhammet Okumuş

Destek Ekibi
Destek Ekibi
Katılım
28 Eylül 2007
Mesajlar
4,025
Excel Vers. ve Dili
2013 Türkçe
Arkadaşlar merhaba,

Şu aralar korana virüsten dolayı evdeyim. Oldukça zamanım oluyor ve bu zamanımı Excel ile uğraşarak geçiriyorum. Bu aralar resimler ile çalışıyorum. Yine bir noktada takıldım.
Sorum şu: Sayfada bulunan her hangi bir resme (jpg, png, jpeg uzantılı) tıklandığında (sol klik ) resim silinsin.
 

Muhammet Okumuş

Destek Ekibi
Destek Ekibi
Katılım
28 Eylül 2007
Mesajlar
4,025
Excel Vers. ve Dili
2013 Türkçe
Korhan Bey harikasınız! Hiç aklıma gelmezdi.

Allah sizden razı olsun, bu mübarek günde tüm dualarınız kabul olsun.
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Eğer resmin üzerine tıkladıktan sonra butona atanmış aşağıdaki makroyu çalıştırırsanız, seçilen resmi silersiniz. Böylece sayfadaki her resme ayrı ayrı makro yazmanıza/atamanıza gerek kalmaz.

Kod:
Sub Test()
    If TypeName(Selection) = "Picture" Then Selection.Delete
End Sub
.
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,651
Excel Vers. ve Dili
Excel : 2010
Alternatif olarak şu şekilde de kullanılabilir.
Kod:
Sub resimsil()
Selection.Delete
End Sub
 

Muhammet Okumuş

Destek Ekibi
Destek Ekibi
Katılım
28 Eylül 2007
Mesajlar
4,025
Excel Vers. ve Dili
2013 Türkçe
Sn. Haluk ve Seyit Tiken cevaplarınız için çok teşekkür ederim.
 
Üst