Bonjour,
Pas besoin de sélectionner pour copier une ligne
Plusieurs solutions possibles. En voici deux.
Range("A" & ActiveCell.Row & ":Y" & ActiveCell.Row).copy
ou
Range(Cells(ActiveCell.Row, "A"), Cells(ActiveCell.Row, "Y")).copy
Si ok -->
Cordialement
Edit : oups xorsankukai, désolé j'ai pas vérifié que quelqu'un avait posté. Mais bon solution différente.