Macro copier/coller Excel

[Philip]

Bonjour à vous,

J'aurais besoins d'une petite information;

Je veux créer une macro dans Excel permettant de copier/coller des cellules. Voici l'exemple:

Je veux copier A1, A6, A11, A16, A21, A26 et ainsi de suite (incrément de 5) dans les cellules E1, E2, E3, E4, E5, E6 et ainsi de suite...

Quelqu'un peut m'aider???

Merci beaucoup,

À plus...

 

[Pascal76]

salut

une petite macro du style qui suit ferait-elle l'affaire ???

Sub copier()

Dim x As Integer, y As Integer

y = 1

For x = 1 To Range("A65536").End(xlUp).Row Step 5
Range("E" & y) = Range("A" & x)
y = y + 1
Next

End Sub

Bon courage

Pascal