sauvegarde onglet à la fermeture

Bonjour, Dans le cadre d'un outil en développement, je souhaite sauvegarder à la fermeture du classeur un onglet "Liste de Noms" en "*.xlsx" => sans macro le code de la macro est : Sub Sauv_ListeDeNoms() Dim chemin, DateSauv, Fichier1, Fichier2, index, nom As String aaaa = Year(Date)...