Figer le résultat d'une formule

[patrick_sepieter]

Bonjour,
Je voudrais pouvoir figer automatiquement le résultat d’un calcul pour le transformer en valeur.
ex : J’ai une formule dans une cellule : =aujourdhui() qui permet de mettre la date du jour. Or, je voudrais que lorsque j’utilise à nouveau le fichier (par ex le lendemain) la date reste celle qui a été rentrée la veille. En clair, je voudrais que l’opération « copier / coller valeurs » se fasse automatiquement. Par exemple lorsque je ferme le fichier…
Merci de votre aide
Patrick

[FFO]

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

[patrick_sepieter]

Merci beaucoup pour ta réponse rapide.
Je vais essayer de mettre en application.

Bien cordialement