Macro répétion en boucle

Bonjour à tous et bonne année !

Je suis actuellement bloqué sur une macro excel...

J'ai établie ma macro pour une ligne mais maintenant j'aimerais créer une répétition de celle-ci. La répétition doit se faire une ligne sur deux.

J'ai testé pas mal de chose mais sans résultats satisfaisant..

Je vous met la macro qu'il faudrait répéter toute les deux lignes (je ne peut pas joindre le fichier désolé) :

Sub Macro6()
'
' Macro6 Macro
'

'
Range("A2").Select
ActiveCell.FormulaR1C1 = "=R[-1]C"
Range("B2").Select
ActiveCell.FormulaR1C1 = "0.02094474"
Range("C2").Select
ActiveCell.FormulaR1C1 = "fuite"
Range("D2").Select
ActiveCell.FormulaR1C1 = ";"
Range("E2").Select
End Sub

En vous remerciant d'avance pour vos conseils !

Hello,

Un fichier exemple serait tout de même le bienvenu, pas besoin de données confidentielle...
PS : Il y a également une section "Code" sur le forum pour que celui-ci soit plus lisible.

Jusqu'à quand/quoi doit s'éxécuter la macro ?

Voici un exemple qui s'éxecute de la ligne deux à 100, toutes les deux lignes

Sub Test()

For x = 2 To 100 Step 2
    With ActiveSheet
        .Cells(x, 1).FormulaR1C1 = "=R[-1]C" ' Remplacer par .Cells(x - 1, 1) si tu cherches uniquement à reprendre la donnée de la ligne en dessus
        .Cells(x, 2) = "0.02094474"
        .Cells(x, 3) = "fuite"
        .Cells(x, 4) = ";"
    End With
Next

End Sub

A+,
Kilian

Salut Kilian,

C'est bon c'est ce qu'il me fallait :)

je prend note de t'es commentaires pour la prochaine fois.

Merci beaucoup !

Rechercher des sujets similaires à "macro repetion boucle"