Date de modification d'une cellule

Bonjour

Je suis nouveau sur le forum et néophyte dans l'utilisation de vba

je recherche un bon code me permettant d'afficher automatiquement la date de modif des cellules de mon fichiers excel

j'ai essayé ce code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Rows.Count = 1 Then

Range("M" & Target.Row) = Now

End If

End Sub

Il fonctionne sauf que le problème dès que l'on clique la date s'affiche. Je voudrais que cela s'adapte à une vraie modif pas à un simple clique. J'ai essayé le mode Change : mon fichier se plante

Merci pour vos suggestions

Bonjour Lynho, bonjour le forum,

le code :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Rows.Count = 1 Then Range("M" & Target.Row) = Now
End Sub

fonctionne parfaitement chez moi !... Mais pour éviter qu'il ne tourne en boucle je l'écrirais plutôt comme ça

Private Sub Worksheet_Change(ByVal Target As Range)
if Target.Column = 13 then exit sub
If Target.Rows.Count = 1 Then Range("M" & Target.Row) = Now
End Sub

Pourrais-tu être plus précis sur le plantage...

Rechercher des sujets similaires à "date modification"