Excel VBA : à la sauvegarde marquer un fichier

Malgré mes recherches de débutant, je n'ai rien trouvé.
Dans une macro, j'ouvre un classeur par :

Code:

---

1 2 3 4

Dim Dossier As String myFile = Application.GetOpenFilename Workbooks.Open Filename:=myFile Dossier = ActiveWorkbook.Name

---

Je fais ma cuisine sur ce classeur et avant la fermeture par :

Code:

---

Workbooks(Dossier).Close SaveChanges:=False

---

je souhaite que le nom du fichier soit précédé par exemple d'un "x " dans le répertoire pour montrer que celui-ci a été traité.

Avec mes remerciements

Bonjour,

essais ceci

Code:

---

1 2 3

NouveauNom = "x " & ActiveWorkBook.Name Chemin = ActiveWorkbook.Path

---

Ça va ajouter "x " en avant de ton nom de ficher
Et tu auras ton chemin, alors en jumelant les deux ensemble tu auras ta clée complète!

Avec les deux codes de tantot, fais toi

FileToSave = ?????
et utilises ce code pour enregister sous.

Code:

---

1 2 3 4

ActiveWorkbook.SaveAs Filename:=FileToSave, _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False

---