Aide VBA code Selection.Autofilter

[Soleil11]

Bonjour le forum,

J'aimerais enlever les filtres de toutes mes feuilles à partir de la feulle 3 jusqu'`à l'infini.

La méthode utilisée ci-dessous n'a pas l'air d'être appréciée par Excel.

Pourriez-vous m'aider à ce sujet.


For s = 3 To Sheets.Count

Selection.AutoFilter

Next s

Merci d'avance.

Soleil11😀

 

[Pierrot93]

Re : Aide VBA code Selection.Autofilter

Bonjour Soleil,

essaye peut être ainsi :

Sub test()
Dim i As Integer
For i = 3 To Sheets.Count
    Sheets(i).AutoFilterMode = False
Next i
End Sub

bonne journée
@+

 

[Soleil11]

Re : Aide VBA code Selection.Autofilter

Bonjour Pierrot,

Cela marche parfaitement..

Merci encore pour votre aide.

Soleil11