Bug macro

Bonjour à tous,

Avec l'aide d'un collègue nous avons réussi à faire cette macro pour que lorsqu'on saisi une date dans une case J automatiquement la ligne entière est couper puis coller dans la feuille historique.

Cependant lorsque je saisie une donnée supplémentaire ou alors que je modifie quelque chose la macro ne fonctionne plus.

Que faire ?

Merci pour votre aide !!

(Le fichier est en PJ)

Bonjour

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("J:J")) Is Nothing Then

Lorsque tu fais cela , le change ne se fait que si tu touches la colonne J

Adapte ton code en fonction de ce que tu veux vraiment...

Bye