Bonjour
Dans le Thisworkbook du classeur pour une cellule A1 en Feuil1 mettre ces lignes de code :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets(« Feuil1 »).Range(« A1 »).Value = Sheets(« Feuil1 »).Range(« A1 »).Value
ThisWorkbook.Save
End Sub
A adapter en fonction du nom de l’onglet et de la cellule concernée
Précision: une fois ce code en place le classeur sera toujours à sa fermeture enregistré avant
J’espère que cela convient