Copier/Coller cellules positionnees à un certain interval l'une de l'autre

[Guillaume45100]

Bonjour,

Je souhaiterais faire une macro excel me permettant de copier/coller des cellules situées à un même interval les unes des autres.

Je m'explique:
Des valeurs que je veux copier sont situées respectivement en cellule E8, E23, E38, E53, chaque cellule est donc séparée de 15 lignes.
Il faudrait donc pouvoir sélectionner toutes les cellules séparées de 15 lignes puis les coller dans une colonne de la même feuille , en H8;H9,H10,H11 par exemple.
Vu le grand nombre de cellule à copier il serait bien d'utiliser une boucle qui s'incrémente jusqu'à ce qu'il n'y ait plus de valeur à copier/coller.

Merci pour votre aide

 

[Pierrot93]

Re : Copier/Coller cellules positionnees à un certain interval l'une de l'autre

Bonjour,

regarde ceci, suppose des titres de colonnes en ligne 7 :

Option Explicit
Sub test()
Dim i As Long
For i = 8 To Range("E65536").End(xlUp).Row Step 15
    Cells(i, 5).Copy Range("H65536").End(xlUp)(2)
Next i
End Sub

bon après midi
@+