Desactivate autofilter

Chombi

XLDnaute Occasionnel
Bonsoir à tous

J'ai cherché sur le forum mais je n'ai rien trouvé sur ceux sujet (j'ai peut être mal cherché)

Je coince: je voudrai defiltrer quand je quitte l'onglet si un filtre est pratiqué.
J'ai essayé avec desactivate et autofilter mais ça defiltre tout sauf la feuille que je quitte

Merci
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re : Desactivate autofilter

Bonsoir Chombi,

Essayez un des deux codes suivants à placer dans le module de code de la feuille où se trouve le filtre:

VB:
Private Sub Worksheet_Deactivate()
  ' supprime l'AutoFilter
  Me.AutoFilterMode = False
End Sub

VB:
Private Sub Worksheet_Deactivate()
  ' conserve l'autofilter mais efface tous les filtres en cours
  If Me.FilterMode Then Me.ShowAllData
End Sub

Voir fichier de test.
 

Pièces jointes

  • Chombi- Autofilter- v1.xlsm
    17.7 KB · Affichages: 33
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 910
Membres
101 837
dernier inscrit
Ugo