Quelle boucle ?

Bonjour,

Je débute en VBA et je suis bloqué dans mon code. Je désire faire une boucle me permettant de copier une plage de cellules autant de fois qu'un nombre positionné sur une autre feuille.

Je m'explique: ma plage se trouve en feuille 1 (a1:p300) et le nombre de fois à copier celle ci se trouve en feuille 2 (b1)

Le but, c'est que ma plage soit dupliquée à la suite autant de fois qu'indiqué en B1.

Quelqu'un peut il m'aider?

Merci d'avance,

Bonsoir,

Essaye comme ça en remplaçant "NomFeuille" par le vrai nom de ta feuille dans laquelle le nombre d'itération se trouve :

For i = 1 To Sheets("NomFeuille").Range("B1")
        '..... ta boucle de copie .....
Next

Bonsoir

Essaye :

Sub Copie()
Dim Lg As Integer
Dim i As Integer

For i = 1 To Sheets("Feuil2").Range("B1")
Lg = Sheets("Feuil1").Range("A65536").End(xlUp).Row
Sheets("Feuil1").Range("A1:P300").Copy Sheets("Feuil1").Range("A" & Lg + 1)
Next i

End Sub

Amicalement

Nad

Rechercher des sujets similaires à "quelle boucle"