Je voudrais enlever le filtre automatique sur de nombreuses feuilles d'un classeur
mais certaines feuilles ne contiennent pas de filtre automatique !!!
et ma macro plante si il n'y a pas de filtre activé.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub sup_filtre()
For r = 1 To Sheets.Count
Sheets(r).Select
Selection.AutoFilter
Next r
End Sub
comment tester la présence d'un filtre auto

Merci d'avance