Copier/Coller avec boucle

Bonjour,

Pouvez vous m'aider à créer une macro pour le problème suivant:

En feuille 1

A1=123

A2=234

... jusqu'à A83=568

Et j'aimerai en feuille 2 que la valeur 123 soit coller de A1 à A5 puis 234 de A6 à A10 puis...

Pouvez vous m'aider? Je vous remercie

Dimitri

Bonsoir,

depuis un bouton de commande...

Private Sub CommandButton1_Click()
'
iRow = Range("A" & Rows.Count).End(xlUp).Row
'
For x = 1 To iRow
    For y = (x * 5)-4 To x * 5
        Sheets(2).Cells(y, 1) = Cells(x, 1)
    Next
Next
'
End Sub

A+

Bonsoir Curulis57,

Merci pour votre aide.

Je ne suis pas une flèche...

Je dois d'abord créer le bouton est l'attacher à votre macro?

Merci

Merci,

Le code fonctionne

Bonne soirée