je voudrais que ma formule prenne en compte ensemble de mes lignes de onglet "pn à dupliquer" soit (A1:A2) x 11 et pas ligne A1 x 11 et ligne A2 x 11 comme ecrit en gras ci-dessous, avez-vous une solution à mon problème je vous remercie
With Sheets("pn à dupliquer")
n = .Range("a" & .Rows.Count).End(xlUp).Row
Set ws = Sheets("resultat")
k = 1
For i = 1 To n
.Cells(i, 1).Copy ws.Cells(k, 5).Resize(11)
k = k + 11
Next i
End With
End Sub