Salut Nrv, le Forum
Tiens la macro Lien supprimé çà me rappelle quelque chose où l'intervenant(e) n'est jamais revenu(e)...(copier coller sur N fois.....)
Enfin pour revenir à nos moutons, sans s'NRV lol, je ne saisis pas du tout où tu veux coller le résultat ? car le "For N = 1 To 10" va ré-écraser les cellules "G" systématiquement au second passge de la Boucle "i"...
Enfin déjà pour que la syntax soit correcte voici une procédure qui va Copier les Cellules "A1:B1" et les Coller 10 fois en Dernière Ligne Vide de "G" à la suite... En second passage, cette macro va copier "A2:B2" et les Coller 10 fois en Dernière Ligne Vide de "G" à la suite des 10 première copies, soit un total de 20 copies...
Sub MacroZOLIE_ZOLIE()
Dim i As Byte, N As Byte, L As Integer
L = Range("G65536").End(xlUp).Row
If L = 1 Then L = 0
For i = 1 To 2
Range("A" & i & ":B" & i).Copy
For N = 1 To 10
With ActiveSheet
L = L + 1
.Paste Destination:=Range("G" & L)
End With
Next N
Next i
Application.CutCopyMode = False
End Sub
Si celà te permet de mieux comprendre la syntax et le processus ...
Bonne Soirée
@+Thierry