Run Time Error 438

Bonjour j'ai le même problème sauf que ma situation est différente. Quand je mets en place une macro sur ordinateur à la maison et que j'ouvre le fichier sur l'ordinateur au bureau ma macro ne fonctionne pas et je reçois le message Run Time error 438 Object doesn't support this properly or method. Je vous mets en fichier joint les lignes jaunes où le bug s'affiche et j'ai remarqué que ça concerne les lignes où je veux faire un tri (AutoFilter)

Merci d'avance pour vos réponses