Afficher la date après chaque modification

Bonjour,

J'ai fait une grille de stock sur Excel et je voudrais que s'affiche la date (J1) du jour où il y a eu une ou des modifications dans des cellules données (G2: G95) car il y en a un qui fait les stock et l'autre commande et pour que la personne commande il doit savoir quand la personne a fait les stocks.

Je sais pas si j'ai été clair sur ma demande ? si vous voulez plus de détail dit le moi.

Pour information j'ai cherché mais je n'ai pas trouvé le code ou fonction correspondant à mon problème s'il y a désolé d'avance pour le dérangement.
Cordialement

Bonjour Magouel,

Voici un code qui devrait faire l'affaire... avec le fichier test ;)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("G2:G95")) Is Nothing Then
        Range("J1").Value = Now
    End If
End Sub

Joe

10datemodif.xlsm (14.86 Ko)
Merci joept69 tu a résolue mon problème

Content pour toi ;)

Rechercher des sujets similaires à "afficher date chaque modification"