Date de modification

Bonsoir!!!!

Svp, est il possible d’établir sur excel un système qui permet de connaitre la date de modification d'une cellule.par ex. si dans

A1 jai 20, et un bonjour je modifie la cellule A1. je suis capable de tracer le jour sa modification a partir dune date.

merci d'avance pour une proposition....

Bonjour rahimpamelo

Oui c'est possible voici une première solution qui trace toutes les modifications sur toutes les feuilles du classeur (sauf la feuille LOG à créer évidement) à mettre dans le module ThisWorkBook

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim wsLog As Object
Dim ligDeb

    If Not (Sh.Name = "LOG") Then
    Application.EnableEvents = False
    Set wsLog = Worksheets("LOG")
    With wsLog
        On Error GoTo errLog
       ligDeb = .Cells(Rows.Count, 1).End(xlUp).Row + 1
        .Cells(ligDeb, 1) = Date
        .Cells(ligDeb, 2) = Time
        .Cells(ligDeb, 3) = Sh.Name
        .Cells(ligDeb, 4) = Target.Address
        .Cells(ligDeb, 5) = Target.Value
        .Cells(ligDeb, 6) = IIf(Target.HasFormula, Target.Formula, "")
    End With
errLog:
    On Error GoTo 0
    Set wsLog = Nothing
    Application.EnableEvents = True
    End If
End Sub

mais cette solution ne me parait pas être une bonne idée / selon ta version LOG va sans doute être vite saturé !

Une autre idée (plus appropriée) serait de faire un fichier texte (.TXT) ...

Mais quel est le vrai but de cette "surveillance" car cela peut éventuellement conditionner la manière de faire !

Merci andréa73 je vais tester sa pour voir si sa peut resoudre mon problème....

merçi

Rechercher des sujets similaires à "date modification"