J'aimerais créer une macro qui permet de supprimer tout les filtres qui ont pu être appliquer sur le fichier soir à la fermeture de celui-ci, soit à l'ouverture, afin d'être sur d'ouvrir le fichier sans aucun filtre actif.
Je ne sais pas si ça à une importance, mais mes filtres sont sur la ligne 3 et vont de la colonne B à la colonne AH.
Sub OterFiltres()
Dim Classeur As Workbook, i As Byte
Set Classeur = ThisWorkbook
For i = 1 To Classeur.Sheets.Count
Classeur.Sheets(i).AutoFilterMode = False
Next i
End Sub
et dans le ThisWorkbook :
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call OterFiltres
End Sub
Private Sub Workbook_Open()
Call OterFiltres
End Sub
Si quelqu'un passe par ici, on va certainement rire de ma solution car trop simpliste mais, elle fonctionne.
Voir en p.j. un essai VBA; la macro s'excécute à l'ouverture du fichier donc pour le tester, ajoute des filtres, enregistre-le et ferme-le. Ensuite à l'ouverture, tu verra les filtres n'y seront plus