Supprimer les filtres d'une feuille en ouvrant l'Excel

Hello !

Je cherche à faire quelque chose mais je ne suis pas sure que ca soit possible ?

L'idée serait que quand on ouvre un excel, les filtres d'une seule des feuilles soient remis à 0 si il y a des filtres. Vous savez si il y a des formules VBA pour ca ?

Merci :)

Bonjour,

Préciser ce qu'il y a dans la feuille SVP

A+

Bonjour,
Une réponse !?
Pas adapté pour des tabaleaux (structurés).
Cdlt.

Private Sub Workbook_Open()
Dim ws As Worksheet

    'nom feuille à définir
    Set ws = ThisWorkbook.Worksheets("Feuil1")

    If ws.AutoFilterMode Then
        With ws.AutoFilter
            If .FilterMode Then
                .ShowAllData
            End If
        End With
    End If

End Sub