Tablo olarak biçimlendirilen aralığa VBA ile filtre koyma-kaldırma

[entropy_tr]

Selamlar arkadaşlar,

Çalışma sayfasında örneğin A1:E10 gibi bir aralık Tablo1 isimli tablo olarak biçimlendirildiğinde bu tablo filtre özelliği açık olarak oluşturulmakta. Ben Tablo1 isimli bu tablonun filtre özelliğini VBA ile kaldırmak istiyorum.

Çalışma sayfasından filtre özelliğini aşağıdaki kod ile kaldırabiliyorum fakat yukarıdaki örnekten yola çıkarak Tablo1 isimli tablonun filtre özelliğini nasıl kaldırabilirim?

If Worksheets("tmp").AutoFilterMode Then
   Selection.AutoFilter
End If

 

[entropy_tr]

Nasıl yapacağımı Excel makro kaydı yaparak buldum.

ActiveSheet.ListObjects("Tablo1").Range.AutoFilter