Hücredeki Bir Önceki Resmin Silinmesi

Çözüldü Hücredeki Bir Önceki Resmin Silinmesi

  • Konuyu başlatan Konuyu başlatan iLHAREF
  • Başlangıç tarihi Başlangıç tarihi

iLHAREF

Normal Üye
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba Arkadaşlar,

B ve I Sütunların da bulunan her hangi bir hücreye değişiklik yaptığımda o hücrenin karşılığına gelen (F ve M) sütunlarındaki hücredeki bir önceki resmin silinip silinmemesini sormasını istiyorum. Yazdığım kodda ise bütün resimleri tek tek soruyor üste belirttiğim gibi bana sadece işlem yaptığım B ve I sütunu karşılıklarına denk gelen resmi silip silmemesini sorması bu konu ile ilgili yardımlarınızı rica ediyorum. Çalışma dosyam ektedir. Yardımcı olacak arkadaşlara şimdiden teşekkür ederim.

1652950267025.webp
 

Ekli dosyalar

Moderatörün son düzenlenenleri:
Merhaba @ILHAREF

Önce aşağıdaki birinci kodu 1 kez çalıştırın (çünkü belgenizde, gizlenmiş durumda bir DropDown nesnesi var)
Ardından ürün isimlerinin olduğu hücrelerde değişiklikler yaparak sonucu gözlemleyin.

[REPLY]
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(6 satır)
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(35 satır)
[/REPLY]
 
Ömer bey,

Birde resim gölgelindirme kodunda yardımınızı rica edecektim makro ile denedim olmadı resimde işaretlediğim gölgelendirmeyi kullanmak istiyorum.

Bu kodu denedim olmadı.

With Selection.ShapeRange
.Fill.Visible = msoTrue
.Fill.ForeColor.SchemeColor = 9 ' resim içi rengi
.Line.Visible = msoTrue
.Line.Weight = 0.01 ' Çerçeve kalınlığı
.Shadow.Type = msoShadow14 'Gölge yönü
.Shadow.IncrementOffsetX 3# ' Gölge x uzaklığı
.Shadow.IncrementOffsetY 3# ' Gölge y uzaklığı
.Shadow.Transparency = 0.5 ' Gölge netliği
End With

1652973043207.webp
 
Moderatörün son düzenlenenleri:
@ILHAREF
Bir önceki cevabımı yok sayın.
Excel versiyonuna göre sorun çıkar mı bilemiyorum ama,
kırmızı satırın sonundaki 3 sayısı değiştirilerek yumuşak kenarlık seviyesi değiştirilebilir.

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(11 satır)
 
Üst