'marche mais commencera automatiquement en A2
Feuil2.[A1:C1].Offset(Feuil2.[A65536].End(xlUp).Row, 0).Value = Feuil1.[A1:C1].Value
'commencera en A1 même si il n'y a pas de valeurs dans la première ligne de feuil2
Feuil2.[A1:C1].Offset( _
IIf(Application.CountA(Feuil2.Rows(1)) = 0, 0, Feuil2.[A65536].End(xlUp).Row), 0).Value = Feuil1.[A1:C1].Value
il y a bien sûr d'autres méthodes