Silme Esnasında Hata

[hakki83]

Merhaba değerli hocalarımız

Örnek dosyada
hem RAPOR sayfasındaki butona bastığımda,

hem de ÇALIŞMA sayfasındaki B2’den itibaren tüm alanı manuel (elle) silmeyi denediğimde, büyük hata veriyor.

Dosya kilitlenmeye yakın hale geliyor ve hata veriyor.

Bu sorunu çözebilir miyiz?

Teşekkürler.

 

[Korhan Ayhan]

Böyle deneyiniz.

Private Sub CommandButton1_Click()
    On Error GoTo 10
    Application.EnableEvents = False
    Sayfa2.Range("A1").CurrentRegion.Offset(1, 1).ClearContents
10  Application.EnableEvents = True
End Sub

 

[hakki83]

Korhan hocam teşekkürler. Peki B2’den itibaren tüm alanı seçip manuel sildiğimde dosya donuyor, bu sorunu çözebilir miyiz?

 

[Korhan Ayhan]

Bende donma olmuyor. Belki bilgisayarınızı Ram'i düşüktür.

 

[hakki83]

Bende donma olmuyor. Belki bilgisayarınızı Ram'i düşüktür.

Korhan hocam kullandığım Ram 4 Gb
Acaba yanlış mı anlaşıldım diye düşündüm.
B2’den itibaren tüm alan derken,
Denemek için
B2:XFD1048576 olarak seçip silmiştim.
siz de aynı alanı mı seçip silmiştiniz?

 

[Korhan Ayhan]

Silmek derken alanı seçip DELETE tuşuna basarak işlem yaptım. İlk denememde bellek yetersiz gibi bir uyarı verdi. TAMAM dedikten sonra işlemi yaptı. Sonrasında tekrar denediğimde bu sefer uyarı vermeden işlem yaptı.

Ayrıca excelde çok büyük alanlar üzerinde işlem yapmak risklidir. İşlem yapacağınız alan üzerine yoğunlaşmanızda fayda var.

 

[hakki83]

Silmek derken alanı seçip DELETE tuşuna basarak işlem yaptım. İlk denememde bellek yetersiz gibi bir uyarı verdi. TAMAM dedikten sonra işlemi yaptı. Sonrasında tekrar denediğimde bu sefer uyarı vermeden işlem yaptı.

Ayrıca excelde çok büyük alanlar üzerinde işlem yapmak risklidir. İşlem yapacağınız alan üzerine yoğunlaşmanızda fayda var.

Anlaşılmıştır değerli hocam