bonjour a tous
j'ai un code qui me permet de recupérer la 1er ligne d'un feuille (variable : Shpl) pour la copier dans la 1er ligne d'une autre feuille (variable : ShConcat)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Shpl.Rows("1:1").Copy
ShConcat.Range("A1").Select
ActiveSheet.Paste
est-il possible de rendre ce code plus propre en le mettant sur une seulle ligne de commande ?