satır silmek için

[esayin]

Arkadaşlar merhaba
Sayfada makro başlamadan önce sayfanın belli 5. satırından sonra olan butün satırları temizlesini istiyorum bu mümkün mü?
Temizlerken kutucugun rengide temizlenebilir mi acaba?
Teşekkür ederim.

 

[Korhan Ayhan]

Merhaba,

Aşağıdaki kod ile 5. satırdan sonraki hücrelerin içeriğini ve rengini silebilirsiniz.

Sub SİL()
    With Range("A5:A" & Rows.Count)
        .EntireRow.ClearContents
        .EntireRow.Interior.ColorIndex = xlNone
    End With
End Sub

 

[esayin]

Korhan Hocam
Çok teşekkür ederim.