[COLOR=seagreen]'If Target.Address = "$A$1" Then 'condition 1 : si l'adresse de la cellule éditée est égale à A1[/COLOR]
[COLOR=seagreen]'cela veut dire que si tu changes ailleurs qu'en A1 la macro n'est pas éxécutée[/COLOR]
[COLOR=seagreen]'dans ce cas là target.row serait toujours égale à 1....[/COLOR]
[COLOR=seagreen]'je pense que tu voulais dire "If Target.Column = 1 Then"[/COLOR]
[COLOR=seagreen]'si le changement à lieu dans la colonne A[/COLOR]
If Target.Column = 1 Then
If Target.Value = "tata" Then
'copie de la ligne dans la feuille tata
Range(Cells(Target.Row, 1), Cells(Target.Row, 13)).Copy Destination:=Sheets("tata").Cells(Target.Row, 1)
End If
End If