Excel macro date derniere modification du doc

Fermé

bastoun Messages postés 56 Date d'inscription lundi 26 février 2001 Statut Membre Dernière intervention 16 mars 2005 - 23 nov. 2001 à 12:11
alexbarre Messages postés 170 Date d'inscription lundi 4 février 2008 Statut Membre Dernière intervention 10 avril 2013 - 12 nov. 2009 à 11:58

comment faire en excel pour obtenir la date de dernière modif du classeur dans une cellule

vite de l'aide

A voir également:

Formule excel date de modification d'une cellule
Formule excel pour additionner plusieurs cellules - Guide
Formule excel si et - Guide
Formule excel moyenne - Guide
Excel cellule couleur si condition texte - Guide
Aller à la ligne dans une cellule excel - Guide

7 réponses

Réponse 1 / 7

Mabelle60 Messages postés 468 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 21 juin 2017 131
4 avril 2007 à 22:07

Bonjour
Dans This Workbook, place :
Dim modif As Boolean

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then
Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
End If
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
modif = True
End Sub

Baz
3 juil. 2007 à 16:56

Merci bcp!

@lex
12 juil. 2009 à 08:26

Bonjour,
J'aarive pas à utiliser ce code, ça me marque erreur... et g n'obtiens rien..
Faut il mettre toutes ces "Sub" comme ci dessous?
Dim modif As Boolean

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then
Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
End If
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
modif = True
End Sub

Discussions similaires

modifier la date de création d'1 fichier?

EXCEL : date de modification d'une cellule

date de modification d'une cellule excel

Excel-MAJ date si modif cellule de la ligne

date de dernière mise à jour d'un site web

Connaitre la date de création d'une page web