Süzgü temizleme

[svorm]

Merhaba,

Yaptığım dosyalarda süzgüden dolayı çok sıkıntı yaşıyorum. Her makronun içerisine ilk önce süzgü yapıp sonra hepsini göster demek zorunda kalıyorum.

Bunu yapmamak için;
“Eğer sayfada süzülü herhangi bir yer var ise süzgüyü kaldır ve hepsini göster” bunu komut olarak nasıl söylerim.

Teşekkürler

 

[Orion1]

Otomatik süz için.

If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilterMode = False

 

[svorm]

Evren hocam teşekkür ederim.

Kodu "sayfada filtre varmı yerine", "Sayfada süzülü herhangi bir yer varmı" diye yapmak mümkünmüdür.
Çünkü sizin kodun devamında yeniden filtre ekleme kodu ekledim.

 

[Levent Menteşoğlu]

Aşağıdaki linki incelemenizi öneririm.

http://www.excel.web.tr/showthread.php?t=43988&highlight=autofilter

Eğer tüm verileri filtreyi kaldırmadan göstermek isterseniz, aşağıdaki gibi bir kodda işiniz görecektir.

If ActiveSheet.AutoFilterMode = True Then ActiveSheet.ShowAllData