Silinen Satırda Bulunan Açıklamaları Silme

YasarPiskin

Kullanıcı
Katkı: %5
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
Türkçe
DATA sayfası J Sütununa girilen ödeme tarihi ile birlikte o satırı silip ARŞİV sayfasına gönderen kod da yapılacak iyileştirme ile var ise o satır ait K sütunundaki açıklamanın da ARŞİV sayfasına aktarılırken DATA sayasından da silinmesinin sağlanması hususunda yardımlarınızı talep ediyorum.

Ekran görüntüsü 1.webp

Ekran görüntüsü 2.webp
 

Ekli dosyalar

Merhaba, dosyanızı inceledim; sorun DATA sayfasının (Sayfa1) kod modülündeki Worksheet_Change olayında yer alıyor.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (15 satır). Giriş Yap
Neden bu şekilde çalışıyor?
  1. J sütununa ödeme tarihi girildiğinde ilgili satır B:M aralığı olarak ARŞİV sayfasına kopyalanıyor; bu kopyalama K sütunundaki açıklamayı da doğru şekilde taşıyor.
    DATA sayfasından silme işlemi ise yalnızca B:J aralığını kapsıyor. Range.Delete Shift:=xlUp yalnızca belirtilen sütunlarda kayma yaptığından, K:M sütunlarındaki açıklama silinmeden ve kaymadan olduğu yerde kalıyor; dosyanızdaki DATA sayfasının 7. satırında bu şekilde sahipsiz kalmış bir açıklama görülebiliyor.
    Silme aralığını B:M olarak genişletmek, K sütunundaki açıklamanın da B:J ile birlikte silinip yukarı kaymasını sağlıyor; böylece DATA sayfasında sahipsiz açıklama kalmıyor.
Notlar
  • Mevcut dosyanızın DATA sayfasında 7. satırda, daha önce bu şekilde silinmiş bir kayda ait K sütunu açıklamasının hâlâ durduğunu görebilirsiniz; kod düzeltmesini uyguladıktan sonra bu tür eski sahipsiz açıklama hücrelerini elle temizlemeniz gerekir, yeni silmelerde tekrar oluşmaz.
 
Geri
Üst