Macro - Revenir en haut de page et désactiver filtre

Bonjour,

Comment ajouter à un bouton, une macro qui me permettrais à chaque fois que j’appuierais sur celui-ci,
de désactiver les filtres actifs et de revenir en haut de page ?

J'ai essayé le code dans module 1 :
Sub defiltrer()

ActiveSheet.ShowAllData

End Sub

Ce code fonctionne très bien quand j'appuie sur mon bouton, le seul problème c'est quand je quitte la page Excel, j'ai un message :


je clic alors sur "OUI". Et à la réouverture de mon fichier excel j'ai ce message :

Donc la macro ne marche pas ..

Merci !