Bonjour,
Ta question est complètement différente de la première là.
Si en feuille 2, tu as déjà une valeur en A1 (B1 = 1) et A2 (B1 = 2) , lorsque tu mettras une nouvelle valeur en A1, elle devra aller où en feuille 2 ?
A te relire
Dan
Edit : autre question, la valeur en B1 est mise avant ou après la valeur en A1 ?
Pour Sylvain sans les Select
Sub copie()
Dim l As Integer
Application.ScreenUpdating = False
l = Sheets("Feuil2").Range("A65536").End(xlUp).Row
Sheets("Feuil1").Range("A1").Cut Destination:=Sheets("feuil2").Range("A" & l + 1)
End Sub
Dan