OVH Cloud OVH Cloud

Date du dernier enregistrement

5 réponses
Avatar
Caroline Tremblay
Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)

5 réponses

Avatar
isabelle
bonjour caroline,

pour une version xl2000 et +
copie cette macro sur la page code de Thisworkbook

Private Sub Workbook_Open()
LaDate = ActiveWorkbook.BuiltinDocumentProperties(12)
Range("A1") = LaDate ' à modifier pour la bonne cellule
End Sub

isabelle



Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)


Avatar
Michel Gaboly
Bonsoir Isabelle.

Cela marche aussi avec Excel 98 (Mac) et donc probablement aussi avec
Excel 97 ;-))



bonjour caroline,

pour une version xl2000 et +
copie cette macro sur la page code de Thisworkbook

Private Sub Workbook_Open()
LaDate = ActiveWorkbook.BuiltinDocumentProperties(12)
Range("A1") = LaDate ' à modifier pour la bonne cellule
End Sub

isabelle


Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)



--
Cordialement,

Michel Gaboly
http://www.gaboly.com


Avatar
isabelle
bonjour Michel,

non, malheureusement ça ne fonctionne pas avec xl97,
on peux récupérer Last print date et Creation date mais il se produit un
erreur sur
Last save time.

isabelle


Bonsoir Isabelle.

Cela marche aussi avec Excel 98 (Mac) et donc probablement aussi avec
Excel 97 ;-))


bonjour caroline,

pour une version xl2000 et +
copie cette macro sur la page code de Thisworkbook

Private Sub Workbook_Open()
LaDate = ActiveWorkbook.BuiltinDocumentProperties(12)
Range("A1") = LaDate ' à modifier pour la bonne cellule
End Sub

isabelle


Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)



--
Cordialement,

Michel Gaboly
http://www.gaboly.com




Avatar
sabatier
avec XL 97, on peut peut-être faire ceci :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'B1 étant la cellule où le texte s'inscrit avec police blanche si on ne
'veut pas qu'il soit vu
Range("B1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub

jps

isabelle a écrit:
bonjour Michel,

non, malheureusement ça ne fonctionne pas avec xl97,
on peux récupérer Last print date et Creation date mais il se produit un
erreur sur
Last save time.

isabelle


Bonsoir Isabelle.

Cela marche aussi avec Excel 98 (Mac) et donc probablement aussi avec
Excel 97 ;-))



bonjour caroline,

pour une version xl2000 et +
copie cette macro sur la page code de Thisworkbook

Private Sub Workbook_Open()
LaDate = ActiveWorkbook.BuiltinDocumentProperties(12)
Range("A1") = LaDate ' à modifier pour la bonne cellule
End Sub

isabelle


Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)


--

Cordialement,

Michel Gaboly
http://www.gaboly.com





--
NB. mes admiratrices voudront bien supprimer "delaile" avant de m'écrire
en bal perso....merci




Avatar
Michel Gaboly
Bonjour Isabelle,

C'est effectivement bizarre : sous Excel 98, j'ai fait un test sur un fichier hier
et j'ai obtenu une date, tandis que ce matin sur un autre fichier, j'ai une erreur
Automation.


bonjour Michel,

non, malheureusement ça ne fonctionne pas avec xl97,
on peux récupérer Last print date et Creation date mais il se produit un
erreur sur
Last save time.

isabelle


Bonsoir Isabelle.

Cela marche aussi avec Excel 98 (Mac) et donc probablement aussi avec
Excel 97 ;-))


bonjour caroline,

pour une version xl2000 et +
copie cette macro sur la page code de Thisworkbook

Private Sub Workbook_Open()
LaDate = ActiveWorkbook.BuiltinDocumentProperties(12)
Range("A1") = LaDate ' à modifier pour la bonne cellule
End Sub

isabelle


Bonjour à tous,

J'ai une feuille EXCEL qui me sert de suivi. Dans une cellule j'ai le texte
"Date de dernièere mise à jour" et dans la cellule d'à côté je voudrais
avoir la date où j'ai fait la dernière modification au fichier.

Si je mets dans ma cellule =aujourd'hui, ça ne fonctionne pas car Excel
change automatiquement la date losque j'ouvre mon fichier. Est-ce qui'il y
aurait une formule ou une macro que je pourrais utiliser?

Je vous remercie d'avance pour toutes les réponses! :-)



--
Cordialement,

Michel Gaboly
http://www.gaboly.com



--
Cordialement,

Michel Gaboly
http://www.gaboly.com