Bonjour ThauThème,
merci pour ta réponse, j'ai une erreur de type "l'indice n'appartient pas à la sélection", j'ai pourtant mis le code dans la feuil9.
Je ne vois pas dans le code le fait que je veuille coller "A8:K18" dans la zone "A10:K10", c'est implicite.
Merci pour ta contribution,
Tinetmil
Sub Macro1()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim DEST As Range 'déclare la variable DEST (cellule de DESTination)
Set O = Sheets("Feuil9") 'définit l'onglet O (à adapter à ton cas)
'définit la cellule de destination DEST (A10 si A10 est vide, sinon la première cellule vide de la colonne A)
Set DEST = IIf(O.Range("A10").Value = "", O.Range("A10"), O.Range("A:K" & Application.Rows.Count).End(xlUp).Offset(1, 0))
O.Range("A8:K8").Copy DEST 'copie la plage A8:K8 et la colle dans DEST
End Sub