Détecter si le filtre automatique est activé

[coco_lapin]

Bonjour le forum,

J'active les filtres automatiques en utilisant le code suivant:

Rows(2).AutoFilter

Je souhaiterais détecter via VBA si le filtre automatique est activé ou pas.

Merci pour votre aide.

 

[mutzik]

Re : Détecter si le filtre automatique est activé

salut mon lapin préféré,

voir autofiltermode

 

[coco_lapin]

Re : Détecter si le filtre automatique est activé

Merci Bertrand, mon pianiste ou oiseau préféré, cela marche très bien.

Voici le code complet

Sub es()
If Worksheets("Feuil1").AutoFilterMode = True Then
Test = "Filtre actif"
Rows(2).AutoFilter
End If
Rows(2).AutoFilter
End Sub