Suivi modifications Excel 2000

Fermé
Vero3646 Messages postés 6 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 2 juin 2015 - 2 juin 2015 à 11:35
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 2 juin 2015 à 12:32
Bonjour,

J'ai une soucis, j'utilise un code VBA que l'on m'a passé et que j'ai un peu modifié à ma sauce mais au final, il ne fait pas ce que je veux.*

En fait il inscrit dans une feuille log toutes les modifications qui ont lieu dans la feuille où je tape mes données.

Voici le code :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value<>PreviousValue Then
Sheets("log").cells(Rows.count, 1).end(xlUp).Offset(1,0).Value = Application.username & " changed cell " & Target.address & " from " & PreviousValue & " to" &Target.Value
End if
End Sub



je ne m'étais pas rendue compte du problème jusqu'à présent car je remplissais un tableau vide donc dans ma feuille log s'affichait "Vero changed cellA1 from to 12".
Sauf que maintenant si je veux modifier le 12, il ne me prend pas en considération la PreviousValue et va mettre :
"Vero changed cellA1 from to 14"
alors que je voudrais qu'il mette "12 to 14"
Quelle erreur ai-je faite dans mon code. Faut-il définir PreviousValue ?
Merci
A voir également:

1 réponse

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
2 juin 2015 à 12:32
Bonjour

ci joint exemple "bigbrother_inside.xls"
à adapter
https://www.cjoint.com/c/EFckFhyBHq0
0