Merci de ta réponse
Non ça sera variable ça pourrais être 10 lignes ou 100 lignes, tout dépend.
J'avais fait ça pour un autre copier coller. Mais je bûche sur celui là (le sujet) pas le code en bas
Sheets("Data").Select
Range("A2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Base").Select
On Error Resume Next
Range("B1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False