Bonjour à tous,
Je viens vers vous car j'ai un petit souci sur une macro :
J'ai créé le code suivant :
Cela me permet à chaque modification dans une cellule d'afficher la date de la modification dans une cellule de la même ligne.
Cela fonctionne très bien, cependant j'ai un bug quand la modification vient d'une liste écrite en horizontale, ce qui parait logique au vu de mon code ...
Dans un souci de perfectionnement pourriez vous m'indiquer comment améliorer ma macro svp ?
Par exemple :
J'ai mis un fichier en copie pour exemple.
Par avance merci
Cordialement,
Je viens vers vous car j'ai un petit souci sur une macro :
J'ai créé le code suivant :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = True Then Exit Sub
ThisRow = Target.Row
Range("G" & ThisRow).Value = Now()
End Sub
Cela me permet à chaque modification dans une cellule d'afficher la date de la modification dans une cellule de la même ligne.
Cela fonctionne très bien, cependant j'ai un bug quand la modification vient d'une liste écrite en horizontale, ce qui parait logique au vu de mon code ...
Dans un souci de perfectionnement pourriez vous m'indiquer comment améliorer ma macro svp ?
Par exemple :
- Amélioration globale de l'écriture, je débute et j'aimerais prendre les bonnes habitudes
- Je ne suis pas arriver à prendre en compte une plage de donnée, car je veux que la date se modifie uniquement en cas de modification de la valeur de la cellule et non à la sélection de la cellule.
- Dans un deuxième temps pour éviter les bugs sur les listes de données.
J'ai mis un fichier en copie pour exemple.
Par avance merci
Cordialement,