Filtre silme

[excellcan]

Forumda emeği geçen tüm arkadaşlara merhaba .

Arkadaşlar filtrelediğim bir alanı makro ile nasıl silebilirim. İlgilenen arkadaşlara şimdiden teşekkürler.

 

[hamitcan]

Aşağıdaki şekilde dener misiniz ?

Sub filtrelenmis_alani_sil()
    Set alan = [A1].CurrentRegion
    alan.Offset(1, 0).Clear
    ActiveSheet.ShowAllData
End Sub