Satır silince formül bozulması

[mcetinkaya65]

Data sayfasındaki veriler sayfa3 geliyor.Fakat data sayfasından bir satır silersek Sayfa 3 de o satır daki formüllü hücreler #BAŞV! oluyor
Saygılarımla..

 

[bedri41]

Ekteki dosyanızı inceleyin
Kolay Gelsin

 

[mcetinkaya65]

İlginize teşekkür ederim.
Tıkladığımızda sayfa 3 ün son satırındaki formülü bozuyor ondan sonra olan formüllerde hepsi silinen adet kadar yukarı kayıyor,silinen miktar kadar son satırı tekrarlıyor.

 

[bedri41]

İlginize teşekkür ederim.
Tıkladığımızda sayfa 3 ün son satırındaki formülü bozuyor ondan sonra olan formüllerde hepsi silinen adet kadar yukarı kayıyor,silinen miktar kadar son satırı tekrarlıyor.

Sayfa3 ün son satırında (500. satırdan söz ediyorsak) bir formül göremedim.
Butonu Tıkladığınızda yapılan işlem şudur; Sizin A2, B2, C2, D2 ... I2 için daha önce yazmış olduğunuz formülleri aynen yazar ve bunları Data sayfasındaki satır kadar çoğaltır.

Data sayfasında 100 satır veri varsa burada 100 satır formül ile dolar.
Ancak kodları başına bir satır ilave yaptım.
Range("a2:I500").ClearContents

Yukarıdaki mesaj ekindeki dosyayı güncelledim. Tekrar indirip bakabilirsiniz.

 

[mcetinkaya65]

İlginize çok teşekkür ederim.
Allah razı olsun.