Formullü hücrelerin silinmemesini sağlamak.

[unur]

Merhaba Arkadaşlar;

Bir sayfada verilerim var.Burada bazı hücrelerde formuller var.Bir butonlar bu sayfanın belirli kısmındaki verilerin silmek istiyorum ancak formullerimin silmesini istemiyorum.

Örn: G10:S250 arasındaki formullü hücreler haricindeki diğer verileri silmek istiyorum.

Teşekkürler.

 

[Korhan Ayhan]

Selamlar,

Silinecek alanı belirtmemişsiniz. Örnek olması açısından aşağıdaki kodu kullanabilirsiniz.

Option Explicit
 
Sub ALAN_TEMİZLE()
    Range("A1:A100").ClearContents
End Sub

 

[unur]

Korhan Bey;

Ben belirli bir alanı silerken o alan içerisindeki formullü hücrelerin silinmemesini istiyorum bu kod hepsinide siliyor.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz. Hücre aralığını kenidinize göre düzenlemeyi unutmayınız.

Option Explicit
 
Sub FORMÜL_HARİCİ_VERİLERİ_SİL()
    On Error Resume Next
    Range("A1:K65536").SpecialCells(xlCellTypeConstants, 23).ClearContents
End Sub

 

[unur]

Teşekkürler Korhan Bey