Problème de compatibilité Excel

Bonjour,
Je rencontre un problème en exécutant une macro excel suite un passage de version d'Excel 2003 à 2016.

Le message qui s'affiche est le suivant: Vérificateur de comptabilité et en Résumé: Perte de fonctionnalité significative.

Citation:

---

Erreur d'exécution '1004': la méthode 'SaveAs' de l'objet'_Workbook' a échoué.

---

Le code où la macro s’arrête est le suivant:

Code:

---

1 2 3 4 5 6 7 8 9

Range("A1").Select   ActiveWorkbook.SaveAs Filename:= _ CheminAcces, _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False   ActiveWorkbook.Close Workbooks(Wbook).Sheets("Choix de la Cie").Select

---

Que dois-je faire pour pouvoir exécuter ma macro et enregistrer mon fichier automatiquement vers le lieu choisi?

Merci de votre aide.

Bien cdt